From 3057e0458f247c9d7bf43b27087c0abcf8aff4b3 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Mon, 10 Jan 2022 04:28:33 +0100 Subject: [PATCH] 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 837dca1afe4..90bf1fe35b5 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) -- 2.39.2