summaryrefslogtreecommitdiff
path: root/lisp/so-long.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2020-01-23 18:42:02 -0800
committerGlenn Morris <rgm@gnu.org>2020-01-23 18:42:02 -0800
commit04ca1a1e080df1801f5ad8e9bc7d4cf68661ca5f (patch)
tree8384a3b463bba22c3eaccc1430f2b2547aa12f75 /lisp/so-long.el
parent963a9ffd66cb29f0370e9a4b854dddda242c54a6 (diff)
downloademacs-04ca1a1e080df1801f5ad8e9bc7d4cf68661ca5f.tar.gz
Make so-long test pass following lisp-mnt change
* lisp/so-long.el (so-long-commentary): Update for lisp-mnt change.
Diffstat (limited to 'lisp/so-long.el')
-rw-r--r--lisp/so-long.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/so-long.el b/lisp/so-long.el
index dcf7e62ca74..6b05f4821b1 100644
--- a/lisp/so-long.el
+++ b/lisp/so-long.el
@@ -353,7 +353,7 @@
;; this caveat is the `mode' pseudo-variable, which is processed early in all
;; versions of Emacs, and can be set to `so-long-mode' if desired.
-;;; * Change Log:
+;; * Change Log:
;;
;; 1.0 - Included in Emacs 27.1, and in GNU ELPA for prior versions of Emacs.
;; - New global mode `global-so-long-mode' to enable/disable the library.
@@ -944,8 +944,10 @@ This command calls `so-long' with the selected action as an argument.")
(cl-letf (((symbol-function 'finder-summary) #'ignore))
(finder-commentary "so-long"))
(let ((inhibit-read-only t))
- (when (looking-at "^Commentary:\n\n")
- (replace-match "so-long.el\n\n"))
+ (if (looking-at "^Commentary:\n\n")
+ (replace-match "so-long.el\n\n")
+ (insert "so-long.el\n")
+ (forward-line 1))
(save-excursion
(while (re-search-forward "^-+$" nil :noerror)
(replace-match ""))))