summaryrefslogtreecommitdiff
path: root/lisp/term
diff options
context:
space:
mode:
authorJan Djärv <jan.h.d@swipnet.se>2006-08-14 09:00:36 +0000
committerJan Djärv <jan.h.d@swipnet.se>2006-08-14 09:00:36 +0000
commit369422051239c7ac9fc48ee42f898e41a77c7561 (patch)
tree84aaf59ffcf3ab62ca10ea24f308c4b2a9de7c5b /lisp/term
parente71cb549802ddb2ab5a04c2b7fdb2d892f846536 (diff)
downloademacs-369422051239c7ac9fc48ee42f898e41a77c7561.tar.gz
* term/x-win.el (menu-bar-edit-menu): Disable paste if buffer is
read only.
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/x-win.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index af45c7c4270..38add1538aa 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -2513,8 +2513,9 @@ order until succeed.")
(yank)))
(define-key menu-bar-edit-menu [paste]
- (cons "Paste" (cons "Paste text from clipboard or kill ring"
- 'x-clipboard-yank)))
+ '(menu-item "Paste" x-clipboard-yank
+ :enable (not buffer-read-only)
+ :help "Paste (yank) text most recently cut/copied"))
;; Initiate drag and drop
(add-hook 'after-make-frame-functions 'x-dnd-init-frame)