# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 754100379 0
# Node ID aa2236a14893717a243783c21938c55c5e625895
# Parent  78323ca35d6f49dc449fc0e8c4ea779ed89d9768
(Info-follow-reference): Correct one-off error in comparing start-point.

diff -r 78323ca35d6f -r aa2236a14893 lisp/info.el
--- a/lisp/info.el	Tue Nov 23 23:57:42 1993 +0000
+++ b/lisp/info.el	Wed Nov 24 00:19:39 1993 +0000
@@ -728,7 +728,7 @@
 		    (1- (point))))
 	 ;; See if this one should be the default.
 	 (and (null default)
-	      (< (match-beginning 0) start-point)
+	      (<= (match-beginning 0) start-point)
 	      (<= start-point (point))
 	      (setq default t))
 	 (setq i 0)