From 294500f232a4c11b1ba87d0ceb49cdced025c676 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Wed, 19 May 1999 01:40:23 +0000
Subject: [PATCH] (texinfo-anchor): Don't delete a non-speace after the @anchor
 command.

---
 lisp/textmodes/texinfmt.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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 
-- 
2.39.5