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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7b6c57bdf40a110a603b9bb1e5da7c4f1c3362f7..12bd4f42e24f0d3af3cd72a0b60bbfbdb06717ae 100644 (file)
--- 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 98b27623ce070f0cab2e427e070c33becb3d15f9..075b893ad6f0ab5242dfdd18832e224d3294d650 100644 (file)
--- 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))))