/[emacs]/emacs/lisp/info.el
ViewVC logotype

Diff of /emacs/lisp/info.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.462 by cyd, Fri Nov 25 16:35:34 2005 UTC revision 1.463 by jurta, Mon Nov 28 21:19:38 2005 UTC
# Line 3804  the variable `Info-file-list-for-emacs'. Line 3804  the variable `Info-file-list-for-emacs'.
3804                                   (hl Info-history-list)                                   (hl Info-history-list)
3805                                   res)                                   res)
3806                              (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)                              (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)
3807                                  (setq file (Info-find-file (match-string 1 node))                                  (setq file (Info-find-file (match-string 1 node) t)
3808                                        node (if (equal (match-string 2 node) "")                                        node (if (equal (match-string 2 node) "")
3809                                                 "Top"                                                 "Top"
3810                                               (match-string 2 node))))                                               (match-string 2 node))))
# Line 3909  the variable `Info-file-list-for-emacs'. Line 3909  the variable `Info-file-list-for-emacs'.
3909                                    (hl Info-history-list)                                    (hl Info-history-list)
3910                                    res)                                    res)
3911                                (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)                                (if (string-match "(\\([^)]+\\))\\([^)]*\\)" node)
3912                                    (setq file (Info-find-file (match-string 1 node))                                    (setq file (Info-find-file (match-string 1 node) t)
3913                                          node (if (equal (match-string 2 node) "")                                          node (if (equal (match-string 2 node) "")
3914                                                   "Top"                                                   "Top"
3915                                                 (match-string 2 node))))                                                 (match-string 2 node))))

Legend:
Removed from v.1.462  
changed lines
  Added in v.1.463

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26