From 271cc5c76c06b30e84d84b42e71be6f7fb772562 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 31 May 2026 21:36:12 +0300 Subject: [PATCH] More tests for fill-paragraph-handle-comment.erts * test/lisp/textmodes/fill-resources/fill-paragraph-handle-comment.erts: Add more tests for current comment lines (bug#80449). --- .../fill-paragraph-handle-comment.erts | 34 +++++++++++++++++-- 1 file changed, 32 insertions(+), 2 deletions(-) diff --git a/test/lisp/textmodes/fill-resources/fill-paragraph-handle-comment.erts b/test/lisp/textmodes/fill-resources/fill-paragraph-handle-comment.erts index c7c9e96ea50..5e46ca35817 100644 --- a/test/lisp/textmodes/fill-resources/fill-paragraph-handle-comment.erts +++ b/test/lisp/textmodes/fill-resources/fill-paragraph-handle-comment.erts @@ -1,6 +1,6 @@ Point-Char: | -Name: fill-paragraph-handle-comment - non-comment line before comment line +Name: fill-paragraph-handle-comment - current non-comment line before comment line Code: (lambda () (setq-local comment-start "# ") @@ -21,7 +21,22 @@ not part of the comment =-=-= -Name: fill-paragraph-handle-comment - non-comment line after comment line +Name: fill-paragraph-handle-comment - non-comment line before current comment line + +=-= + +this is not part of the comment this is not part of the comment +# this is a comment this is a comment this is a comment| + +=-= + +this is not part of the comment this is not part of the comment +# this is a comment this is a comment this +# is a comment + +=-=-= + +Name: fill-paragraph-handle-comment - comment line before current non-comment line =-= @@ -35,3 +50,18 @@ this is not part of the comment this is not part of the comment =-=-= + +Name: fill-paragraph-handle-comment - current comment line before non-comment line + +=-= + +# this is a comment this is a comment this is a comment| +this is not part of the comment this is not part of the comment + +=-= + +# this is a comment this is a comment this +# is a comment +this is not part of the comment this is not part of the comment + +=-=-=