(help-make-xrefs): Skip spaces too when skipping tabs.

2 files changed, 9 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7b6c57bdf40..12bd4f42e24 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2007-07-02  Martin Rudalics  <rudalics@gmx.at>
+
+        * help-mode.el (help-make-xrefs):  Skip spaces too when
+        skipping tabs.
+
+        * ffap.el (dired-at-point-prompter): Improve prompt in
+        list-directory case.
+
 2007-07-01  Richard Stallman  <rms@gnu.org>
 
         * cus-start.el (max-mini-window-height): Added.
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 98b27623ce0..075b893ad6f 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -487,7 +487,7 @@ that."
                       ;; Skip a single blank line.
                       (and (eolp) (forward-line))
                       (end-of-line)
-                      (skip-chars-backward "^\t\n")
+                      (skip-chars-backward "^ \t\n")
                       (if (and (>= (current-column) col)
                                (looking-at "\\(\\sw\\|-\\)+$"))
                           (let ((sym (intern-soft (match-string 0))))