[Emacs-diffs] Changes to emacs/lisp/help-mode.el

[Richard M. Stallman]

Index: emacs/lisp/help-mode.el
diff -c emacs/lisp/help-mode.el:1.10 emacs/lisp/help-mode.el:1.11
*** emacs/lisp/help-mode.el:1.10        Mon Jan  7 00:20:57 2002
--- emacs/lisp/help-mode.el     Sat Jan 12 16:00:17 2002
***************
*** 560,567 ****
              method (cadr item)
              args (cddr item))))
      (apply method args)
!     ;; FIXME: are we sure we're in the right buffer ?
!     (goto-char position)))
  
  (defun help-go-back ()
    "Invoke the [back] button (if any) in the Help mode buffer."
--- 560,569 ----
              method (cadr item)
              args (cddr item))))
      (apply method args)
!     (with-current-buffer buffer
!       (if (get-buffer-window buffer)
!         (set-window-point (get-buffer-window buffer) position)
!       (goto-char position)))))
  
  (defun help-go-back ()
    "Invoke the [back] button (if any) in the Help mode buffer."