diff options
| author | Lars Ingebrigtsen | 2019-10-09 09:45:07 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-10-09 09:45:07 +0200 |
| commit | fdf7349b1c4b0d599208761af948bd1d6f2434fd (patch) | |
| tree | 1882927f47d27746193de6f03f78fbe93e7ad577 | |
| parent | 3d0d2d1a195072d7683b88757f63e8e953988cfb (diff) | |
| download | emacs-fdf7349b1c4b0d599208761af948bd1d6f2434fd.tar.gz emacs-fdf7349b1c4b0d599208761af948bd1d6f2434fd.zip | |
Protect against unlikely case of [menu-bar] not being bound
* lisp/recentf.el (recentf-show-menu):
(recentf-hide-menu): The [menu-bar] key may be unbound (bug#25191).
| -rw-r--r-- | lisp/recentf.el | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/lisp/recentf.el b/lisp/recentf.el index 2720286814a..83c71a561a9 100644 --- a/lisp/recentf.el +++ b/lisp/recentf.el | |||
| @@ -658,15 +658,17 @@ Return nil if file NAME is not one of the ten more recent." | |||
| 658 | 658 | ||
| 659 | (defun recentf-show-menu () | 659 | (defun recentf-show-menu () |
| 660 | "Show the menu of recently opened files." | 660 | "Show the menu of recently opened files." |
| 661 | (easy-menu-add-item | 661 | (when (keymapp (recentf-menu-bar)) |
| 662 | (recentf-menu-bar) recentf-menu-path | 662 | (easy-menu-add-item |
| 663 | (list recentf-menu-title :filter 'recentf-make-menu-items) | 663 | (recentf-menu-bar) recentf-menu-path |
| 664 | recentf-menu-before)) | 664 | (list recentf-menu-title :filter 'recentf-make-menu-items) |
| 665 | recentf-menu-before))) | ||
| 665 | 666 | ||
| 666 | (defun recentf-hide-menu () | 667 | (defun recentf-hide-menu () |
| 667 | "Hide the menu of recently opened files." | 668 | "Hide the menu of recently opened files." |
| 668 | (easy-menu-remove-item (recentf-menu-bar) recentf-menu-path | 669 | (when (keymapp (recentf-menu-bar)) |
| 669 | recentf-menu-title)) | 670 | (easy-menu-remove-item (recentf-menu-bar) recentf-menu-path |
| 671 | recentf-menu-title))) | ||
| 670 | 672 | ||
| 671 | ;;; Predefined menu filters | 673 | ;;; Predefined menu filters |
| 672 | ;; | 674 | ;; |