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 |
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 |
|
|
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 |
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 |