]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert "[WIP] Add and improve section headings"
authorJonas Bernoulli <jonas@bernoul.li>
Wed, 18 Nov 2020 17:13:31 +0000 (18:13 +0100)
committerJonas Bernoulli <jonas@bernoul.li>
Wed, 18 Nov 2020 17:13:31 +0000 (18:13 +0100)
This reverts commit 007a5a677573ab628426a0605eb38f8e68fe1953.

lisp/allout.el
lisp/icomplete.el
lisp/net/eudc.el

index 07049a05d7c3310cd77bc6397d1762908b72fced..b56071de59e83dd2adf3bad178e2e533ebc739fa 100644 (file)
@@ -2529,10 +2529,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)
@@ -6514,7 +6514,6 @@ If BEG is bigger than END we return 0."
 ;;  - and closes the last topic (this local-variables section).
 ;;Local variables:
 ;;allout-layout: (0 : -1 -1 0)
-;;outline-regexp: ";;\\([;*]+ [^\s\t\n]\\|;_[ *+=>]*\\|###autoload\\)\\|("
 ;;End:
 
 ;;; allout.el ends here
index f84ef784343272e79b35406f37b16ea1a32f79b9..4e546807b7f0c8cf77449ebecef73c09beb3e70b 100644 (file)
@@ -237,8 +237,8 @@ Last entry becomes the first and can be selected with
       (push (car last) comps)
       (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',
@@ -782,7 +782,7 @@ matches exist."
                    "}")
          (concat determ " [Matched]"))))))
 
-;;;_* 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
@@ -798,10 +798,9 @@ matches exist."
 ;;;_* Provide
 (provide 'icomplete)
 
-;;;_* Local emacs vars.
+;;_* Local emacs vars.
 ;;Local variables:
 ;;allout-layout: (-2 :)
-;;outline-regexp: ";;\\([;*]+ [^\s\t\n]\\|;_[ *+=>]*\\|###autoload\\)\\|("
 ;;End:
 
 ;;; icomplete.el ends here
index 226bf7e0871ff821f6d50490333195760305f9de..08cab4f0470372c058e641df0c938561814c35be 100644 (file)
@@ -1150,9 +1150,7 @@ 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)
@@ -1209,7 +1207,5 @@ This does nothing except loading eudc by autoload side-effect."
 ;;}}}
 
 (provide 'eudc)
-;; Local Variables:
-;; outline-regexp: ";;\\([;*]+ [^\s\t\n]\\|{{{\\|###autoload\\)\\|("
-;; End:
+
 ;;; eudc.el ends here