/[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.427 by lute, Thu May 26 13:01:03 2005 UTC revision 1.428 by monnier, Fri May 27 16:19:35 2005 UTC
# Line 1  Line 1 
1  ;;; info.el --- info package for Emacs  ;;; info.el --- info package for Emacs
2    
3  ;; Copyright (C) 1985,86,92,93,94,95,96,97,98,99,2000,01,02,03,04,2005  ;; Copyright (C) 1985, 1986, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
4  ;;  Free Software Foundation, Inc.  ;;   2000, 2001, 2002, 2003, 2004, 2005  Free Software Foundation, Inc.
5    
6  ;; Maintainer: FSF  ;; Maintainer: FSF
7  ;; Keywords: help  ;; Keywords: help
# Line 515  in all the directories in that path." Line 515  in all the directories in that path."
515        ;; since the argument will then be parsed improperly.  This also        ;; since the argument will then be parsed improperly.  This also
516        ;; has the added benefit of allowing node names to be included        ;; has the added benefit of allowing node names to be included
517        ;; following the parenthesized filename.        ;; following the parenthesized filename.
518        (if (and (stringp file) (string-match "(.*)" file))        (Info-goto-node
519            (Info-goto-node file)         (if (and (stringp file) (string-match "(.*)" file))
520          (Info-goto-node (concat "(" file ")")))             file
521             (concat "(" file ")")))
522      (if (zerop (buffer-size))      (if (zerop (buffer-size))
523          (Info-directory))))          (Info-directory))))
524    
# Line 1344  any double quotes or backslashes must be Line 1345  any double quotes or backslashes must be
1345  ;; Go to an info node specified with a filename-and-nodename string  ;; Go to an info node specified with a filename-and-nodename string
1346  ;; of the sort that is found in pointers in nodes.  ;; of the sort that is found in pointers in nodes.
1347    
1348  ;;;###autoload  ;; Don't autoload this function: the correct entry point for other packages
1349    ;; to use is `info'.  --Stef
1350    ;; ;;;###autoload
1351  (defun Info-goto-node (nodename &optional fork)  (defun Info-goto-node (nodename &optional fork)
1352    "Go to info node named NODENAME.  Give just NODENAME or (FILENAME)NODENAME.    "Go to info node named NODENAME.  Give just NODENAME or (FILENAME)NODENAME.
1353  If NODENAME is of the form (FILENAME)NODENAME, the node is in the Info file  If NODENAME is of the form (FILENAME)NODENAME, the node is in the Info file
# Line 4127  BUFFER is the buffer speedbar is request Line 4130  BUFFER is the buffer speedbar is request
4130    
4131  (provide 'info)  (provide 'info)
4132    
4133  ;;; arch-tag: f2480fe2-2139-40c1-a49b-6314991164ac  ;; arch-tag: f2480fe2-2139-40c1-a49b-6314991164ac
4134  ;;; info.el ends here  ;;; info.el ends here

Legend:
Removed from v.1.427  
changed lines
  Added in v.1.428

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