diff options
| author | Juanma Barranquero | 2008-01-25 15:11:18 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2008-01-25 15:11:18 +0000 |
| commit | 41ff6d0a23c2002affb8f5235a84a49a8245d9f7 (patch) | |
| tree | 38c31596ce7efca7a6b1a146bd896fadf4c65b2e | |
| parent | 0feb2f35d3748400f297f6c608809018bb2b9da1 (diff) | |
| download | emacs-41ff6d0a23c2002affb8f5235a84a49a8245d9f7.tar.gz emacs-41ff6d0a23c2002affb8f5235a84a49a8245d9f7.zip | |
(allout-unload-function): New function.
| -rw-r--r-- | lisp/allout.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/allout.el b/lisp/allout.el index 43642e6ee26..7782170e834 100644 --- a/lisp/allout.el +++ b/lisp/allout.el | |||
| @@ -2120,6 +2120,16 @@ OPEN: A TOPIC that is not CLOSED, though its OFFSPRING or BODY may be." | |||
| 2120 | ;;;_ > allout-minor-mode | 2120 | ;;;_ > allout-minor-mode |
| 2121 | (defalias 'allout-minor-mode 'allout-mode) | 2121 | (defalias 'allout-minor-mode 'allout-mode) |
| 2122 | 2122 | ||
| 2123 | ;;;_ > allout-unload-function | ||
| 2124 | (defun allout-unload-function () | ||
| 2125 | "Unload the allout outline library." | ||
| 2126 | (save-current-buffer | ||
| 2127 | (dolist (buffer (buffer-list)) | ||
| 2128 | (set-buffer buffer) | ||
| 2129 | (when allout-mode (allout-mode -1)))) | ||
| 2130 | ;; continue standard unloading | ||
| 2131 | nil) | ||
| 2132 | |||
| 2123 | ;;;_ - Position Assessment | 2133 | ;;;_ - Position Assessment |
| 2124 | ;;;_ > allout-hidden-p (&optional pos) | 2134 | ;;;_ > allout-hidden-p (&optional pos) |
| 2125 | (defsubst allout-hidden-p (&optional pos) | 2135 | (defsubst allout-hidden-p (&optional pos) |