(kill-new): Call menu-bar-update-yank-menu only if that function is defined.

diff --git a/lisp/simple.el b/lisp/simple.el
index e05c1e7af8d143b307603fb0792df85f032d37da..1e30d146c16a7a68ba4bc1eab74248b0062979a5 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -998,7 +998,8 @@ Set the kill-ring-yank pointer to point to it.
 If `interprogram-cut-function' is non-nil, apply it to STRING.
 Optional second argument REPLACE non-nil means that STRING will replace
 the front of the kill ring, rather than being added to the list."
-  (menu-bar-update-yank-menu string (and replace (car kill-ring)))
+  (and (fboundp 'menu-bar-update-yank-menu)
+       (menu-bar-update-yank-menu string (and replace (car kill-ring))))
   (if replace
       (setcar kill-ring string)
     (setq kill-ring (cons string kill-ring))