summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-01-05 04:44:30 +0000
committerRichard M. Stallman <rms@gnu.org>1997-01-05 04:44:30 +0000
commit44a103e30036fd18a0a38c848fd7abab26d73db4 (patch)
tree07d9ff5b7bba9fda89cbc2f00efa00e70049d62d
parentdb9f3e4f800b19cc217cf40caa15655ad219c3df (diff)
downloademacs-44a103e30036fd18a0a38c848fd7abab26d73db4.tar.gz
(frame-or-buffer-changed-p): Definition deleted.
(the end): Use mapc, to force loading of cl-extra.
-rw-r--r--lisp/msb.el13
1 files changed, 4 insertions, 9 deletions
diff --git a/lisp/msb.el b/lisp/msb.el
index 62fd4aefb36..70361ea5fcd 100644
--- a/lisp/msb.el
+++ b/lisp/msb.el
@@ -986,15 +986,6 @@ variable `msb-menu-cond'."
(cddr buffers-menu))
(or buffers-menu 'undefined)))))))
-(when (and (boundp 'menu-bar-update-hook)
- (not (fboundp 'frame-or-buffer-changed-p)))
- (defvar msb--buffer-count 0)
- (defun frame-or-buffer-changed-p ()
- (let ((count (length (buffer-list))))
- (when (/= count msb--buffer-count)
- (setq msb--buffer-count count)
- t))))
-
(unless (or (not (boundp 'menu-bar-update-hook))
(memq 'menu-bar-update-buffers menu-bar-update-hook))
(add-hook 'menu-bar-update-hook 'menu-bar-update-buffers))
@@ -1004,4 +995,8 @@ variable `msb-menu-cond'."
(provide 'msb)
(eval-after-load 'msb (run-hooks 'msb-after-load-hooks))
+
+;; Load the cl-extra library now, since we will certainly need it later.
+(mapc 'ignore nil)
+
;;; msb.el ends here