diff options
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 | ;; |