# HG changeset patch
# User Robert J. Chassell <bob@rattlesnake.com>
# Date 1020085166 0
# Node ID 5cc9ed7bc5b534556495a0c4918e49c029c74804
# Parent  aa05e5b0cabeeede99b713b0f08c5f8287b621f5
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.

diff -r aa05e5b0cabe -r 5cc9ed7bc5b5 lisp/textmodes/texinfo.el
--- a/lisp/textmodes/texinfo.el	Mon Apr 29 12:45:41 2002 +0000
+++ b/lisp/textmodes/texinfo.el	Mon Apr 29 12:59:26 2002 +0000
@@ -808,11 +808,12 @@
 
 (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 ()