diff lisp/msb.el @ 20506:c096aa581013

Fix mailer-introduced garbling. (msb--toggle-menu-type): Don't pass arg to menu-bar-update-buffers.

--- a/lisp/msb.el	Mon Dec 22 02:33:25 1997 +0000
+++ b/lisp/msb.el	Mon Dec 22 06:06:54 1997 +0000
@@ -467,8 +467,7 @@
 
 ;; Create an alist with all buffers from LIST that lies under the same
 ;; directory will be in the same item as the directory string.
-;; ((PATH1 . (BUFFER-1 BUFFER-2 ...)) (PATH2 . (BUFFER-K BUFFER-K+1...)) =
-...)
+;; ((PATH1 . (BUFFER-1 BUFFER-2 ...)) (PATH2 . (BUFFER-K BUFFER-K+1...)) ...)
 (defun msb--init-file-alist (list)
   (let ((buffer-alist
 	 ;; Make alist that looks like
@@ -494,7 +493,7 @@
 		(lambda (item)
 		  (cond
 		   ((and path
-			 (string=3D path (car item)))
+			 (string= path (car item)))
 		    ;; The same path as earlier: Add to current list of
 		    ;; buffers.
 		    (push (cdr item) buffers)
@@ -861,7 +860,7 @@
 (defun msb--toggle-menu-type ()
   (interactive)
   (setq msb-files-by-directory (not msb-files-by-directory))
-  (menu-bar-update-buffers t))
+  (menu-bar-update-buffers))
 
 (defun mouse-select-buffer (event)
   "Pop up several menus of buffers, for selection with the mouse.