From 481b0db7f7890ba7c18d68992121b2f7e28323e3 Mon Sep 17 00:00:00 2001 From: "Robert J. Chassell" Date: Mon, 29 Apr 2002 12:59:26 +0000 Subject: [PATCH] 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. --- lisp/textmodes/texinfo.el | 9 +++++---- 1 file 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 () -- 2.11.4.GIT