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).

diff --git a/lisp/recentf.el b/lisp/recentf.el
index 2720286814af44c14c5dc133b7f9fd0d0e111f44..83c71a561a99038eeec889e2c1bf630a2038b729 100644 (file)
--- 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."
 
 (defun recentf-show-menu ()
   "Show the menu of recently opened files."
-  (easy-menu-add-item
-   (recentf-menu-bar) recentf-menu-path
-   (list recentf-menu-title :filter 'recentf-make-menu-items)
-   recentf-menu-before))
+  (when (keymapp (recentf-menu-bar))
+    (easy-menu-add-item
+     (recentf-menu-bar) recentf-menu-path
+     (list recentf-menu-title :filter 'recentf-make-menu-items)
+     recentf-menu-before)))
 
 (defun recentf-hide-menu ()
   "Hide the menu of recently opened files."
-  (easy-menu-remove-item (recentf-menu-bar) recentf-menu-path
-                         recentf-menu-title))
+  (when (keymapp (recentf-menu-bar))
+    (easy-menu-remove-item (recentf-menu-bar) recentf-menu-path
+                           recentf-menu-title)))
 \f
 ;;; Predefined menu filters
 ;;