changeset 8768:e2073805b688

(kill-new): Call menu-bar-update-yank-menu only if that function is defined.
author Karl Heuer <kwzh@gnu.org>
date Thu, 15 Sep 1994 22:19:50 +0000
parents 441af4b664ac
children b7eb229e956b
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Thu Sep 15 22:16:49 1994 +0000
+++ b/lisp/simple.el	Thu Sep 15 22:19:50 1994 +0000
@@ -998,7 +998,8 @@
 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))