[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 8ebd8e1 4/4: In files that use allout use it for all headings
From: |
Jonas Bernoulli |
Subject: |
master 8ebd8e1 4/4: In files that use allout use it for all headings |
Date: |
Wed, 30 Jun 2021 16:25:54 -0400 (EDT) |
branch: master
commit 8ebd8e1fea1d0d925850db97b64bf13a6a1f698b
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
In files that use allout use it for all headings
* lisp/allout.el: Don't prefix regular comments with three
semicolons.
* lisp/icomplete.el: Use allout syntax for all headings.
* lisp/net/eudc.el: Use allout syntax for all headings.
---
lisp/allout.el | 8 ++++----
lisp/icomplete.el | 8 ++++----
lisp/net/eudc.el | 4 +++-
3 files changed, 11 insertions(+), 9 deletions(-)
diff --git a/lisp/allout.el b/lisp/allout.el
index 1605ce2..0625ea6 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -2490,10 +2490,10 @@ We skip anomalous low-level topics, a la
`allout-aberrant-container-p'."
;;;_ - Subtree Charting
;;;_ " These routines either produce or assess charts, which are
-;;; nested lists of the locations of topics within a subtree.
-;;;
-;;; Charts enable efficient subtree navigation by providing a reusable basis
-;;; for elaborate, compound assessment and adjustment of a subtree.
+;; nested lists of the locations of topics within a subtree.
+;;
+;; Charts enable efficient subtree navigation by providing a reusable basis
+;; for elaborate, compound assessment and adjustment of a subtree.
;;;_ > allout-chart-subtree (&optional levels visible orig-depth prev-depth)
(defun allout-chart-subtree (&optional levels visible orig-depth prev-depth)
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index 08b4ef2..26698c4 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -276,8 +276,8 @@ Last entry becomes the first and can be selected with
(setcdr last-but-one (cdr (cdr last-but-one)))))
(completion--cache-all-sorted-completions beg end comps)))
-;;; Helpers for `fido-mode' (or `ido-mode' emulation)
-;;;
+;;;_* Helpers for `fido-mode' (or `ido-mode' emulation)
+
(defun icomplete-fido-kill ()
"Kill line or current completion, like `ido-mode'.
If killing to the end of line make sense, call `kill-line',
@@ -966,7 +966,7 @@ matches exist."
;; is cached.
(if last (setcdr last base-size))))))))
-;;; Iswitchb compatibility
+;;;_* Iswitchb compatibility
;; We moved Iswitchb to `obsolete' in 24.4, but autoloads in files in
;; `obsolete' aren't obeyed (since that would encourage people to keep using
@@ -981,7 +981,7 @@ matches exist."
(provide 'icomplete)
-;;_* Local emacs vars.
+;;;_* Local emacs vars.
;;Local variables:
;;allout-layout: (-2 :)
;;End:
diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el
index 425217c..6459c52 100644
--- a/lisp/net/eudc.el
+++ b/lisp/net/eudc.el
@@ -1129,7 +1129,9 @@ queries the server for the existing fields and displays a
corresponding form."
(cons "Directory Servers"
(easy-menu-create-menu "Directory Servers" (cdr (eudc-menu))))))
-;;; Load time initializations :
+;;}}}
+
+;;{{{ Load time initializations
;; Load the options file
(if (and (not noninteractive)