diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2007-10-31 00:30:09 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2007-10-31 00:30:09 +0000 |
| commit | 0b704e151e5bc87a53ffbe9a2c6d880fb002aa2a (patch) | |
| tree | b3d89d8d025d564363a4d6ce71fad4a5c9c21c5b | |
| parent | 437ce4beb5d63696a18aa5d199320d6209f8f1f3 (diff) | |
| download | emacs-0b704e151e5bc87a53ffbe9a2c6d880fb002aa2a.tar.gz | |
(msb-unload-hook): Remove function and variable.
(msb-unload-function): New-style unload function,
adapted from `msb-unload-hook'.
| -rw-r--r-- | lisp/msb.el | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/msb.el b/lisp/msb.el index 11c9cfc4d37..b67e471c229 100644 --- a/lisp/msb.el +++ b/lisp/msb.el @@ -955,7 +955,7 @@ It takes the form ((TITLE . BUFFER-LIST)...)." "*Files by directory*") 'msb--toggle-menu-type))))))) -(defun msb--create-buffer-menu () +(defun msb--create-buffer-menu () (save-match-data (save-excursion (msb--create-buffer-menu-2)))) @@ -1104,7 +1104,7 @@ variable `msb-menu-cond'." (f-title (format "Frames (%d)" frame-length))) ;; List only the N most recently selected frames (when (and (integerp msb-max-menu-items) - (> msb-max-menu-items 1) + (> msb-max-menu-items 1) (> frame-length msb-max-menu-items)) (setcdr (nthcdr msb-max-menu-items frames) nil)) (setq frames-menu @@ -1149,9 +1149,11 @@ different buffer menu using the function `msb'." (add-hook 'menu-bar-update-hook 'menu-bar-update-buffers) (menu-bar-update-buffers t))) -(defun msb-unload-hook () - (msb-mode 0)) -(add-hook 'msb-unload-hook 'msb-unload-hook) +(defun msb-unload-function () + "Unload the Msb library." + (msb-mode -1) + ;; continue standard unloading + nil) (provide 'msb) (eval-after-load "msb" '(run-hooks 'msb-after-load-hook 'msb-after-load-hooks)) |