mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-22 18:35:09 +00:00
Code Issues Releases Activity

(outline-resolve-xref): Do not mistake a blank line

Browse Source 
following an xref (@) bullet as part of the rerefenced file name.
This commit is contained in:
Karl Heuer 1996-07-13 18:40:22 +00:00
parent 92373e943a
commit fa29cfef7c
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/allout.el
View File

@ -3120,8 +3120,7 @@ by pops to non-distinctive yanks. Bug..."
(let (file-name)
(save-excursion
(let* ((text-start outline-recent-prefix-end)
(heading-end (progn (outline-pre-next-preface)
(point))))
(heading-end (progn (end-of-line) (point))))
(goto-char text-start)
(setq file-name
(if (re-search-forward "\\s-\\(\\S-*\\)" heading-end t)