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.

diff --git a/lisp/allout.el b/lisp/allout.el
index 1605ce2ce3399374a09f8a10d953ef8a41ae64aa..0625ea68abe3e7792d470445c45ecdae4ae62feb 100644 (file)
--- 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 08b4ef2030a5fc86484f3dc3f90b12127720b6bd..26698c43cfd183dc07cf8854c37bd409ed036f50 100644 (file)
--- 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 425217cf65c1aa2fe06092c277e900aed2dfb649..6459c52afeee8225319f4983be1e90b7d0c89e7d 100644 (file)
--- 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)