Mercurial > emacs

changeset 13589:a2554930ea38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calendar-goto-info-node): Don't let same-window-buffer-names do its usual job--force *info* buffer into another window.
author Richard M. Stallman <rms@gnu.org>
date Sat, 18 Nov 1995 18:24:42 +0000
parents c50d9d86eda9
children bd48b68249cf
files lisp/calendar/calendar.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/calendar.el	Sat Nov 18 17:44:30 1995 +0000
+++ b/lisp/calendar/calendar.el	Sat Nov 18 18:24:42 1995 +0000
@@ -1772,11 +1772,12 @@
   "Go to the info node for the calendar."
   (interactive)
   (require 'info)
-  (let ((where (Info-find-emacs-command-nodes 'calendar)))
+  (let ((where (save-window-excursion
+		 (Info-find-emacs-command-nodes 'calendar))))
     (if (not where)
         (error "Couldn't find documentation for the calendar.")
-      (save-window-excursion (info))
-      (pop-to-buffer "*info*")
+      (let (same-window-buffer-names)
+	(info))
       (Info-find-node (car (car where)) (car (cdr (car where)))))))
 
 (defun calendar-mode ()