[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/native-comp 4c45319 2/2: Revert "[WIP] Add and improve section h
From: |
Jonas Bernoulli |
Subject: |
feature/native-comp 4c45319 2/2: Revert "[WIP] Add and improve section headings" |
Date: |
Wed, 18 Nov 2020 12:14:29 -0500 (EST) |
branch: feature/native-comp
commit 4c453196a1fbb55e887c24c546632d346147959b
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
Revert "[WIP] Add and improve section headings"
This reverts commit 007a5a677573ab628426a0605eb38f8e68fe1953.
---
lisp/allout.el | 9 ++++-----
lisp/icomplete.el | 9 ++++-----
lisp/net/eudc.el | 8 ++------
3 files changed, 10 insertions(+), 16 deletions(-)
diff --git a/lisp/allout.el b/lisp/allout.el
index 07049a0..b56071d 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -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
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index f84ef78..4e54680 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -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
diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el
index 226bf7e..08cab4f 100644
--- a/lisp/net/eudc.el
+++ b/lisp/net/eudc.el
@@ -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