Cause `texinfo-insert-@node' to insert a carriage return after the

comment line.  This change does not affect normal use.  On the one
hand, it causes the command to insert a blank line when invoked on the
line preceeding the @section line.  This is a fault.  On the other
hand, it causes the command to format the output properly when you
invoke the command on the same line as the @chapter or similar line.
This is beneficial.

1 files changed, 5 insertions, 4 deletions

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 6d963afe5b1..d31bae4a0dd 100644
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -808,11 +808,12 @@ The default is not to surround any existing words with the braces."
 
 (defun texinfo-insert-@node ()
   "Insert the string `@node' in a Texinfo buffer.
-This also inserts on the following line a comment indicating
-the order of arguments to @node."
+Insert a comment on the following line indicating the order of
+arguments to @node.  Insert a carriage return after the comment line.
+Leave point after `@node'."
   (interactive)
-  (insert "@node \n@comment  node-name,  next,  previous,  up")
-  (forward-line -1)
+  (insert "@node \n@comment  node-name,  next,  previous,  up\n")
+  (forward-line -2)
   (forward-char 6))
 
 (defun texinfo-insert-@noindent ()