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

This commit is contained in:
Martin Rudalics 2007-07-02 05:46:19 +00:00
parent 20a65989fe
commit f204ca2feb
2 changed files with 10 additions and 1 deletions

View file

@ -1,3 +1,12 @@
2007-07-02 Martin Rudalics <rudalics@gmx.at>
* help-mode.el (help-make-xrefs): Skip spaces too when skipping tabs.
* mouse.el (mouse-drag-mode-line-1): Quit mouse tracking when
event is not a cons cell. Do not unread drag-mouse-1 events.
Select right window in check whether space was stolen from
window above.
2007-07-01 Richard Stallman <rms@gnu.org>
* files.el (find-file-visit-truename): Fix safe-local-variable value.

View file

@ -462,7 +462,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))))