emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 3057e0458f: Make old elide-head commands wrappers for mode


From: Stefan Kangas
Subject: master 3057e0458f: Make old elide-head commands wrappers for mode
Date: Sun, 9 Jan 2022 22:30:19 -0500 (EST)

branch: master
commit 3057e0458f247c9d7bf43b27087c0abcf8aff4b3
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Make old elide-head commands wrappers for mode
    
    * lisp/elide-head.el (elide-head, elide-head-show): Make into
    wrappers around elide-head-mode.
---
 lisp/elide-head.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/elide-head.el b/lisp/elide-head.el
index 837dca1afe..90bf1fe35b 100644
--- a/lisp/elide-head.el
+++ b/lisp/elide-head.el
@@ -154,14 +154,14 @@ This is suitable as an entry on `find-file-hook' or 
appropriate mode hooks."
   (declare (obsolete elide-head-mode "29.1"))
   (interactive "P")
   (if arg
-      (elide-head--show)
-    (elide-head--hide)))
+      (elide-head-mode -1)
+    (elide-head-mode 1)))
 
 (defun elide-head-show ()
   "Show a header in the current buffer elided by \\[elide-head]."
   (declare (obsolete elide-head-mode "29.1"))
   (interactive)
-  (elide-head--show))
+  (elide-head-mode -1))
 
 (provide 'elide-head)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]