From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 19 May 1999 01:40:23 +0000 (+0000)
Subject: (texinfo-anchor): Don't delete a non-speace after the @anchor command.
X-Git-Tag: emacs-20.4~204
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=294500f232a4c11b1ba87d0ceb49cdced025c676;p=emacs.git

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

diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 101737227b2..91fa154933b 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -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