(mouse-menu-bar-buffers): Use list-buffers-directory.
authorRichard M. Stallman <rms@gnu.org>
Fri, 13 Aug 1993 18:40:37 +0000 (18:40 +0000)
committerRichard M. Stallman <rms@gnu.org>
Fri, 13 Aug 1993 18:40:37 +0000 (18:40 +0000)
lisp/menu-bar.el

index 2b34cb9..ebada61 100644 (file)
@@ -208,7 +208,11 @@ and selects that window."
                                        (save-excursion
                                          (set-buffer elt)
                                          (if buffer-read-only "%" " "))
-                                       (or (buffer-file-name elt) ""))
+                                       (or (buffer-file-name elt)
+                                           (save-excursion
+                                             (set-buffer elt)
+                                             list-buffers-directory)
+                                           ""))
                                       elt)
                                      head)))
                      (and head (> (length (car (car head))) maxlen)