[Emacs-diffs] Changes to emacs/lisp/textmodes/makeinfo.el

[Richard M. Stallman]

Index: emacs/lisp/textmodes/makeinfo.el
diff -c emacs/lisp/textmodes/makeinfo.el:1.12 
emacs/lisp/textmodes/makeinfo.el:1.13
*** emacs/lisp/textmodes/makeinfo.el:1.12       Mon Aug  6 06:12:17 2001
--- emacs/lisp/textmodes/makeinfo.el    Sun Dec 30 14:33:13 2001
***************
*** 193,202 ****
    (if (and makeinfo-temp-file (file-exists-p makeinfo-temp-file))
        (delete-file makeinfo-temp-file))
    ;; Always use the version on disk.
!   (if (get-file-buffer makeinfo-output-file-name)
!       (progn (set-buffer makeinfo-output-file-name)
!            (revert-buffer t t))
!     (find-file makeinfo-output-file-name))
    (goto-char (point-min)))
  
  (defun makeinfo-buffer ()
--- 193,206 ----
    (if (and makeinfo-temp-file (file-exists-p makeinfo-temp-file))
        (delete-file makeinfo-temp-file))
    ;; Always use the version on disk.
!   (let ((buffer (get-file-buffer makeinfo-output-file-name)))
!     (if buffer
!       (with-current-buffer buffer
!         (revert-buffer t t))
!       (setq buffer (find-file-noselect makeinfo-output-file-name)))
!     (if (window-dedicated-p (selected-window))
!       (switch-to-buffer-other-window buffer)
!       (switch-to-buffer buffer)))
    (goto-char (point-min)))
  
  (defun makeinfo-buffer ()