From: Chong Yidong <cyd@gnu.org>
Date: Sat, 17 Nov 2012 06:48:10 +0000 (+0800)
Subject: * help-mode.el (help-xref-interned): End on point-min.
X-Git-Tag: emacs-24.3.90~173^2~18^2~88
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8e7696a18bbfbd9cf2b158b7a633f274fbb2b706;p=emacs.git

* help-mode.el (help-xref-interned): End on point-min.

Fixes: debbugs:12737
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0570703b11d..72192bc79e5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-11-17  Chong Yidong  <cyd@gnu.org>
 
+	* help-mode.el (help-xref-interned): End on point-min (Bug#12737).
+
 	* filecache.el (file-cache-add-file): Handle relative file name in
 	the argument (Bug#12694).
 
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index c1ce5a521be..48c5849d301 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -677,7 +677,8 @@ help buffer."
 		    " is also a " "face." "\n\n" facedoc))
 	  ;; Don't record the `describe-function' item in the stack.
 	  (setq help-xref-stack-item nil)
-	  (help-setup-xref (list #'help-xref-interned symbol) nil)))))))
+	  (help-setup-xref (list #'help-xref-interned symbol) nil))))
+      (goto-char (point-min)))))
 
 
 ;; Navigation/hyperlinking with xrefs