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