From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 16 Feb 1999 00:33:44 +0000 (+0000)
Subject: (speedbar-item-info-tag-helper): Scan the whole line.
X-Git-Tag: emacs-20.4~628
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2654fa92b2d9bd1cd6f43f3ae48ca1f8b754d306;p=emacs.git

(speedbar-item-info-tag-helper): Scan the whole line.
---

diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index 4bf9a9fcc0c..608c11dfbb3 100644
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -5,7 +5,7 @@
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Version: 0.8.1
 ;; Keywords: file, tags, tools
-;; X-RCS: $Id: speedbar.el,v 1.19 1999/01/23 13:23:26 zappo Exp rms $
+;; X-RCS: $Id: speedbar.el,v 1.20 1999/01/31 04:39:37 rms Exp rms $
 
 ;; This file is part of GNU Emacs.
 
@@ -1698,6 +1698,7 @@ it from the speedbar buffer."
   "Display info about a tag that is on the current line.
 nil if not applicable."
   (save-excursion
+    (beginning-of-line)
     (if (re-search-forward " > \\([^ ]+\\)$"
 			   (save-excursion(end-of-line)(point)) t)
 	(let ((tag (match-string 1))