[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 3c00496: Delete Emacs 19 compat code in foldout.el
From: |
Stefan Kangas |
Subject: |
master 3c00496: Delete Emacs 19 compat code in foldout.el |
Date: |
Tue, 30 Mar 2021 17:37:46 -0400 (EDT) |
branch: master
commit 3c00496baa5f2017a58ab43dcafeebe7a92658e1
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
Delete Emacs 19 compat code in foldout.el
* lisp/foldout.el (foldout-hide-flag):
(foldout-show-flag): Delete Emacs 19 compat code and make obsolete.
(foldout-exit-fold): Don't use above obsolete variable.
---
lisp/foldout.el | 19 +++++++++----------
1 file changed, 9 insertions(+), 10 deletions(-)
diff --git a/lisp/foldout.el b/lisp/foldout.el
index 2de49d2..3419d7f 100644
--- a/lisp/foldout.el
+++ b/lisp/foldout.el
@@ -230,14 +230,6 @@ An end marker of nil means the fold ends after
(point-max).")
(setcdr outl-entry (nconc foldout-entry (cdr outl-entry)))
))
-;; outline-flag-region has different `flag' values in outline.el and
-;; noutline.el for hiding and showing text.
-
-(defconst foldout-hide-flag
- (if (featurep 'noutline) t ?\^M))
-
-(defconst foldout-show-flag
- (if (featurep 'noutline) nil ?\n))
(defun foldout-zoom-subtree (&optional exposure)
@@ -364,8 +356,7 @@ exited and text is left visible."
;; make sure the next heading is exposed
(if end-marker
- (outline-flag-region end-of-subtree beginning-of-heading
- foldout-show-flag)))
+ (outline-flag-region end-of-subtree beginning-of-heading nil)))
;; zap the markers so they don't slow down editing
(set-marker start-marker nil)
@@ -551,6 +542,14 @@ Valid modifiers are shift, control, meta, alt, hyper and
super.")
(define-key outline-minor-mode-map mouse-3 'foldout-mouse-hide-or-exit)
))
+;; Obsolete.
+
+(defconst foldout-hide-flag t)
+(make-obsolete-variable 'foldout-hide-flag nil "28.1")
+
+(defconst foldout-show-flag nil)
+(make-obsolete-variable 'foldout-show-flag nil "28.1")
+
(provide 'foldout)
;;; foldout.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 3c00496: Delete Emacs 19 compat code in foldout.el,
Stefan Kangas <=