summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/lisp-mnt.el
diff options
context:
space:
mode:
authorMatt Armstrong <matt@rfc20.org>2021-02-09 09:10:45 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2021-02-09 09:10:45 +0100
commit9c1e89a32c65244a992a8a1ff73fd606f94a8a15 (patch)
tree05cc2f9a9ea2e772049af33418403a563e6cfa35 /lisp/emacs-lisp/lisp-mnt.el
parent0cc35e14319d6b113049f5389629dc693541a14c (diff)
downloademacs-9c1e89a32c65244a992a8a1ff73fd606f94a8a15.tar.gz
Preserve leading whitespace in `lm-commentary'.
* lisp/emacs-lisp/lisp-mnt.el (lm-commentary): Preserve leading whitespace (bug#46364).
Diffstat (limited to 'lisp/emacs-lisp/lisp-mnt.el')
-rw-r--r--lisp/emacs-lisp/lisp-mnt.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el
index adb9cb2372c..6d9c8c32794 100644
--- a/lisp/emacs-lisp/lisp-mnt.el
+++ b/lisp/emacs-lisp/lisp-mnt.el
@@ -495,7 +495,7 @@ absent, return nil."
(concat "^;;;[[:blank:]]*\\("
lm-commentary-header
"\\):[[:blank:]\n]*")
- "^;;[[:blank:]]*" ; double semicolon prefix
+ "^;;[[:blank:]]?" ; double semicolon prefix
"[[:blank:]\n]*\\'") ; trailing new-lines
"" (buffer-substring-no-properties
start (lm-commentary-end))))))))