Built-in files auto-update: Sat Feb 13 22:24:06 UTC 2021
This commit is contained in:
parent
8f934f138d
commit
228097a19e
|
@ -399,9 +399,9 @@ is used instead."
|
|||
(and (file-exists-p file)
|
||||
(lm-commentary file)))))
|
||||
(with-temp-buffer
|
||||
(if (>= emacs-major-version 27)
|
||||
(if (>= emacs-major-version 28)
|
||||
(insert commentary)
|
||||
;; Taken from 27.1's `lm-commentary'.
|
||||
;; Taken from 28.0's `lm-commentary'.
|
||||
(insert
|
||||
(replace-regexp-in-string ; Get rid of...
|
||||
"[[:blank:]]*$" "" ; trailing white-space
|
||||
|
@ -411,7 +411,7 @@ is used instead."
|
|||
(concat "^;;;[[:blank:]]*\\("
|
||||
lm-commentary-header
|
||||
"\\):[[:blank:]\n]*")
|
||||
"^;;[[:blank:]]*" ; double semicolon prefix
|
||||
"^;;[[:blank:]]?" ; double semicolon prefix
|
||||
"[[:blank:]\n]*\\'") ; trailing new-lines
|
||||
"" commentary))))
|
||||
(unless (or (bobp) (= (char-before) ?\n))
|
||||
|
|
Loading…
Reference in New Issue