Mercurial > hg > xemacs-beta

comparison lisp/packages/info.el @ 48:56c54cf7c5b6 r19-16b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16b90
author cvs
date Mon, 13 Aug 2007 08:56:04 +0200
parents 8fc7fe29b841
children 131b0175ea99
comparison
equal deleted inserted replaced
47:11c6df210d7f 48:56c54cf7c5b6
359 "List of file name suffixes and associated decoding commands. 359 "List of file name suffixes and associated decoding commands.
360 Each entry should be (SUFFIX . STRING); if STRING contains %s, that is 360 Each entry should be (SUFFIX . STRING); if STRING contains %s, that is
361 changed to name of the file to decode, otherwise the file is given to 361 changed to name of the file to decode, otherwise the file is given to
362 the command as standard input. If STRING is nil, no decoding is done.") 362 the command as standard input. If STRING is nil, no decoding is done.")
363 363
364 (defvar Info-footnote-tag "See" 364 (defvar Info-footnote-tag "Note"
365 "*Symbol that identifies a footnote or cross-reference. 365 "*Symbol that identifies a footnote or cross-reference.
366 All \"*Note\" references will be changed to use this word instead.") 366 All \"*Note\" references will be changed to use this word instead.")
367 367
368 (defvar Info-current-file nil 368 (defvar Info-current-file nil
369 "Info file that Info is now looking at, or nil.") 369 "Info file that Info is now looking at, or nil.")
1827 (if Info-standalone 1827 (if Info-standalone
1828 (save-buffers-kill-emacs) 1828 (save-buffers-kill-emacs)
1829 (bury-buffer (current-buffer)) 1829 (bury-buffer (current-buffer))
1830 (if (and (featurep 'toolbar) 1830 (if (and (featurep 'toolbar)
1831 (eq toolbar-info-frame (selected-frame))) 1831 (eq toolbar-info-frame (selected-frame)))
1832 (delete-frame toolbar-info-frame) 1832 (condition-case nil
1833 (delete-frame toolbar-info-frame)
1834 (error (bury-buffer)))
1833 (switch-to-buffer (other-buffer (current-buffer)))))) 1835 (switch-to-buffer (other-buffer (current-buffer))))))
1834 1836
1835 (defun Info-undefined () 1837 (defun Info-undefined ()
1836 "Make command be undefined in Info." 1838 "Make command be undefined in Info."
1837 (interactive) 1839 (interactive)