Mercurial > hg > xemacs-beta
comparison lisp/packages/info.el @ 2:ac2d302a0011 r19-15b2
Import from CVS: tag r19-15b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:46:35 +0200 |
parents | 376386a54a3c |
children | 0293115a14e9 |
comparison
equal
deleted
inserted
replaced
1:c0c6a60d29db | 2:ac2d302a0011 |
---|---|
1822 "Exit Info by selecting some other buffer." | 1822 "Exit Info by selecting some other buffer." |
1823 (interactive) | 1823 (interactive) |
1824 (if Info-standalone | 1824 (if Info-standalone |
1825 (save-buffers-kill-emacs) | 1825 (save-buffers-kill-emacs) |
1826 (switch-to-buffer (prog1 (other-buffer (current-buffer)) | 1826 (switch-to-buffer (prog1 (other-buffer (current-buffer)) |
1827 (bury-buffer (current-buffer)))))) | 1827 (bury-buffer (current-buffer)) |
1828 (if (featurep 'toolbar) | |
1829 (if (frame-live-p toolbar-info-frame) | |
1830 (delete-frame toolbar-info-frame))))))) | |
1828 | 1831 |
1829 (defun Info-undefined () | 1832 (defun Info-undefined () |
1830 "Make command be undefined in Info." | 1833 "Make command be undefined in Info." |
1831 (interactive) | 1834 (interactive) |
1832 (ding)) | 1835 (ding)) |