(texinfo-anchor): Don't delete a non-speace after the @anchor command.

This commit is contained in:
Richard M. Stallman 1999-05-19 01:40:23 +00:00
parent b97771fc17
commit 294500f232

View file

@ -1143,7 +1143,8 @@ Leave point after argument."
(let (anchor-string
(here (- (point) 7)) ; save location of beginning of `@anchor'
(arg (texinfo-parse-arg-discard)))
(delete-char 1) ; since a space is left after -discard
(if (looking-at " ") ; since a space may be left after -discard
(delete-char 1))
(forward-paragraph)
(let ((end (point)))
(if (save-excursion