andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* menu-bar.el (menu-bar-file-menu): Add the same :enable to

Browse source 
"Open Directory" as for "Open File".
This commit is contained in:
Jan Djärv 2005-03-06 20:18:06 +00:00
parent 0251bafb90
commit bf7970c564
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2005-03-06 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* menu-bar.el (menu-bar-file-menu): Add the same :enable to
"Open Directory" as for "Open File".
2005-03-06 Chong Yidong <cyd@stupidchicken.com>
* simple.el (activate-mark-hook, deactivate-mark-hook): Add defvars.

2
lisp/menu-bar.el
View file

@ -184,6 +184,8 @@ A large number or nil slows down menu responsiveness."
:help "Insert another file into current buffer"))
(define-key menu-bar-file-menu [dired]
'(menu-item "Open Directory..." dired
:enable (not (window-minibuffer-p
(frame-selected-window menu-updating-frame)))
:help "Read a directory, operate on its files"))
(define-key menu-bar-file-menu [open-file]
'(menu-item "Open File..." find-file-existing