diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-01-09 23:20:39 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-01-09 23:20:39 +0000 |
commit | 73b2cc5a6bdb0981a54422c88d5a6c6c598e3565 (patch) | |
tree | f7cf0f57483164e0e8cf692b78bc6e78d3d9cad5 /lisp/term | |
parent | 9116e2578ccab15e37a0c955f70c4e2f9e9a2580 (diff) | |
download | emacs-73b2cc5a6bdb0981a54422c88d5a6c6c598e3565.tar.gz |
(x-cut-buffer-or-selection-value): Don't print messages
about failure to get selection or cut buffer.
Diffstat (limited to 'lisp/term')
-rw-r--r-- | lisp/term/x-win.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 1e8cb5a5cba..3deb6328a6c 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -578,13 +578,13 @@ This is in addition to the primary selection.") ;; Don't die if x-get-selection signals an error. (condition-case c (setq text (x-get-selection 'PRIMARY)) - (error (message "%s" c))) + (error nil)) (if (string= text "") (setq text nil)) (if x-select-enable-clipboard (condition-case c (setq text (x-get-selection 'CLIPBOARD)) - (error (message "%s" c)))) + (error nil))) (if (string= text "") (setq text nil)) (or text (setq text (x-get-cut-buffer 0))) (if (string= text "") (setq text nil)) |