diff options
| author | Juanma Barranquero | 2007-10-30 00:15:06 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-10-30 00:15:06 +0000 |
| commit | fc8c78cccd54ba33cccc2c663ba35825a8a06c63 (patch) | |
| tree | f3a832cd8eb9170a185843a6ed9609e554a28ed3 /lisp | |
| parent | 28d5d98ba5009e4835998bc66a3003253b74554a (diff) | |
| download | emacs-fc8c78cccd54ba33cccc2c663ba35825a8a06c63.tar.gz emacs-fc8c78cccd54ba33cccc2c663ba35825a8a06c63.zip | |
(follow-unload-function): Add docstring.
(follow-unload-function): Remove variable.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/follow.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/follow.el b/lisp/follow.el index 2ea4466ea05..7e175e70230 100644 --- a/lisp/follow.el +++ b/lisp/follow.el | |||
| @@ -2244,6 +2244,7 @@ This prevents `mouse-drag-region' from messing things up." | |||
| 2244 | ;;{{{ The end | 2244 | ;;{{{ The end |
| 2245 | 2245 | ||
| 2246 | (defun follow-unload-function () | 2246 | (defun follow-unload-function () |
| 2247 | "Unload Follow mode library." | ||
| 2247 | (follow-stop-intercept-process-output) | 2248 | (follow-stop-intercept-process-output) |
| 2248 | (dolist (group '((before | 2249 | (dolist (group '((before |
| 2249 | ;; XEmacs | 2250 | ;; XEmacs |
| @@ -2269,10 +2270,9 @@ This prevents `mouse-drag-region' from messing things up." | |||
| 2269 | (intern (concat "follow-" (symbol-name fun)))) | 2270 | (intern (concat "follow-" (symbol-name fun)))) |
| 2270 | (ad-update fun)) | 2271 | (ad-update fun)) |
| 2271 | (error nil)))))) | 2272 | (error nil)))))) |
| 2273 | ;; continue standard processing | ||
| 2272 | nil) | 2274 | nil) |
| 2273 | 2275 | ||
| 2274 | (defvar follow-unload-function 'follow-unload-function) | ||
| 2275 | |||
| 2276 | ;; | 2276 | ;; |
| 2277 | ;; We're done! | 2277 | ;; We're done! |
| 2278 | ;; | 2278 | ;; |