aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorLars Hansen <[email protected]>2005-08-10 19:39:51 +0000
committerLars Hansen <[email protected]>2005-08-10 19:39:51 +0000
commit80123c9ecb77b6ccea11aee9ecfb84e42efc00cc (patch)
tree0d2e17413db81da202e1ec9238b7a8817a5b0fb1 /lisp
parentabe5c13aa02424137dff1980a49b0e9273e59332 (diff)
Add handler to desktop-buffer-mode-handlers.
(Info-restore-desktop-buffer): Remove autoload cookie. (Info-mode): Add autoload cookie.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/info.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el
index 2d03190b60..462c276785 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3255,6 +3255,8 @@ With a zero prefix arg, put the name inside a function call to `info'."
(defvar tool-bar-map)
+;; Autoload cookie needed by desktop.el
+;;;###autoload
(defun Info-mode ()
"Info mode provides commands for browsing through the Info documentation tree.
Documentation in Info is divided into \"nodes\", each of which discusses
@@ -4179,7 +4181,6 @@ BUFFER is the buffer speedbar is requesting buttons for."
(if (not (member Info-current-file '("apropos" "history" "toc")))
(list Info-current-file Info-current-node)))
-;;;###autoload
(defun Info-restore-desktop-buffer (desktop-buffer-file-name
desktop-buffer-name
desktop-buffer-misc)
@@ -4193,6 +4194,9 @@ BUFFER is the buffer speedbar is requesting buttons for."
(Info-find-node first second)
(current-buffer))))
+(add-to-list 'desktop-buffer-mode-handlers
+ '(Info-mode . Info-restore-desktop-buffer))
+
(provide 'info)
;; arch-tag: f2480fe2-2139-40c1-a49b-6314991164ac