aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/msb.el12
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)...)."
955 "*Files by directory*") 955 "*Files by directory*")
956 'msb--toggle-menu-type))))))) 956 'msb--toggle-menu-type)))))))
957 957
958(defun msb--create-buffer-menu () 958(defun msb--create-buffer-menu ()
959 (save-match-data 959 (save-match-data
960 (save-excursion 960 (save-excursion
961 (msb--create-buffer-menu-2)))) 961 (msb--create-buffer-menu-2))))
@@ -1104,7 +1104,7 @@ variable `msb-menu-cond'."
1104 (f-title (format "Frames (%d)" frame-length))) 1104 (f-title (format "Frames (%d)" frame-length)))
1105 ;; List only the N most recently selected frames 1105 ;; List only the N most recently selected frames
1106 (when (and (integerp msb-max-menu-items) 1106 (when (and (integerp msb-max-menu-items)
1107 (> msb-max-menu-items 1) 1107 (> msb-max-menu-items 1)
1108 (> frame-length msb-max-menu-items)) 1108 (> frame-length msb-max-menu-items))
1109 (setcdr (nthcdr msb-max-menu-items frames) nil)) 1109 (setcdr (nthcdr msb-max-menu-items frames) nil))
1110 (setq frames-menu 1110 (setq frames-menu
@@ -1149,9 +1149,11 @@ different buffer menu using the function `msb'."
1149 (add-hook 'menu-bar-update-hook 'menu-bar-update-buffers) 1149 (add-hook 'menu-bar-update-hook 'menu-bar-update-buffers)
1150 (menu-bar-update-buffers t))) 1150 (menu-bar-update-buffers t)))
1151 1151
1152(defun msb-unload-hook () 1152(defun msb-unload-function ()
1153 (msb-mode 0)) 1153 "Unload the Msb library."
1154(add-hook 'msb-unload-hook 'msb-unload-hook) 1154 (msb-mode -1)
1155 ;; continue standard unloading
1156 nil)
1155 1157
1156(provide 'msb) 1158(provide 'msb)
1157(eval-after-load "msb" '(run-hooks 'msb-after-load-hook 'msb-after-load-hooks)) 1159(eval-after-load "msb" '(run-hooks 'msb-after-load-hook 'msb-after-load-hooks))