From 214b69d9e9fc507b465aeb2529cd6ad68fa78c54 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 29 Sep 1994 18:51:54 +0000 Subject: [PATCH] (texinfo-format-region, texinfo-format-buffer-1): Search back for the @include. --- lisp/textmodes/texinfmt.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el index fc079976c8b..83cf620826d 100644 --- a/lisp/textmodes/texinfmt.el +++ b/lisp/textmodes/texinfmt.el @@ -202,7 +202,7 @@ converted to Info is stored in a temporary buffer." (setq texinfo-command-end (point)) (let ((filename (concat input-directory (texinfo-parse-line-arg)))) - (beginning-of-line) + (re-search-backward "^@include") (delete-region (point) (save-excursion (forward-line 1) (point))) (message "Reading included file: %s" filename) (save-excursion @@ -327,7 +327,7 @@ converted to Info is stored in a temporary buffer." (setq texinfo-command-end (point)) (let ((filename (concat input-directory (texinfo-parse-line-arg)))) - (beginning-of-line) + (re-search-backward "^@include") (delete-region (point) (save-excursion (forward-line 1) (point))) (message "Reading included file: %s" filename) (save-excursion -- 2.39.5