mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

Fix namespacing problem in allout.el

Browse source 
* lisp/allout.el (allout-outlinify-sticky): Rename from
'outlineify-sticky'.  Make old name into obsolete alias.
(outlinify-sticky): Make into obsolete function alias for
'allout-outlinify-sticky'.
(allout-mode): Doc fix.
This commit is contained in:
Stefan Kangas 2022-08-06 17:00:13 +02:00
parent a3e894810a
commit 7c8332e096
2 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

4
etc/NEWS
View file

@ -2234,6 +2234,10 @@ remote host are shown. Alternatively, the user option
'proced-show-remote-processes' can be set to non-nil. 'proced-show-remote-processes' can be set to non-nil.
'proced-signal-function' has been marked obsolete. 'proced-signal-function' has been marked obsolete.
---
*** 'outlineify-sticky' command is renamed to 'allout-outlinify-sticky'.
The old name is still available as an obsolete function alias.
* New Modes and Packages in Emacs 29.1 * New Modes and Packages in Emacs 29.1

13
lisp/allout.el
View file

@ -1699,7 +1699,7 @@ the HOT-SPOT Operation section.
Misc commands: Misc commands:
------------- -------------
M-x outlineify-sticky Activate outline mode for current buffer, \\[allout-outlinify-sticky] Activate outline mode for current buffer,
and establish a default file-var setting and establish a default file-var setting
for `allout-layout'. for `allout-layout'.
\\[allout-mark-topic] `allout-mark-topic' \\[allout-mark-topic] `allout-mark-topic'
@ -6184,19 +6184,18 @@ save. See `allout-encrypt-unencrypted-on-saves' for more info."
;;;_ #9 miscellaneous ;;;_ #9 miscellaneous
;;;_ : Mode: ;;;_ : Mode:
;;;_ > outlineify-sticky () ;;;_ > allout-outlinify-sticky ()
;; outlinify-sticky is correct spelling; provide this alias for sticklers:
;;;###autoload ;;;###autoload
(defalias 'outlinify-sticky #'outlineify-sticky) (define-obsolete-function-alias 'outlinify-sticky #'allout-outlinify-sticky "29.1")
;;;###autoload ;;;###autoload
(defun outlineify-sticky (&optional _arg) (define-obsolete-function-alias 'outlineify-sticky #'allout-outlinify-sticky "29.1")
;;;###autoload
(defun allout-outlinify-sticky (&optional _arg)
"Activate outline mode and establish file var so it is started subsequently. "Activate outline mode and establish file var so it is started subsequently.
See `allout-layout' and customization of `allout-auto-activation' See `allout-layout' and customization of `allout-auto-activation'
for details on preparing Emacs for automatic allout activation." for details on preparing Emacs for automatic allout activation."
(interactive "P") (interactive "P")
(if (allout-mode-p) (allout-mode)) ; deactivate so we can re-activate... (if (allout-mode-p) (allout-mode)) ; deactivate so we can re-activate...
(allout-mode) (allout-mode)