Mercurial > emacs
comparison lisp/term/x-win.el @ 109448:334eb7871775
Change x-select-enable-primary to nil.
* lisp/mouse.el (mouse-drag-copy-region):
* lisp/simple.el (select-active-regions): Likewise.
* lisp/term/x-win.el (x-select-enable-primary): Change default to nil.
(x-select-enable-clipboard): Add :version keyword.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 16 Jul 2010 22:49:48 -0400 |
| parents | c9970d4bfd62 |
| children | 52a2d97e28e4 |
comparison
equal
deleted
inserted
replaced
| 109447:f0c7ada3b642 | 109448:334eb7871775 |
|---|---|
| 1221 | 1221 |
| 1222 (defcustom x-select-enable-clipboard t | 1222 (defcustom x-select-enable-clipboard t |
| 1223 "Non-nil means cutting and pasting uses the clipboard. | 1223 "Non-nil means cutting and pasting uses the clipboard. |
| 1224 This is in addition to, but in preference to, the primary selection." | 1224 This is in addition to, but in preference to, the primary selection." |
| 1225 :type 'boolean | 1225 :type 'boolean |
| 1226 :group 'killing) | 1226 :group 'killing |
| 1227 | 1227 :version "24.1") |
| 1228 (defcustom x-select-enable-primary t | 1228 |
| 1229 (defcustom x-select-enable-primary nil | |
| 1229 "Non-nil means cutting and pasting uses the primary selection." | 1230 "Non-nil means cutting and pasting uses the primary selection." |
| 1230 :type 'boolean | 1231 :type 'boolean |
| 1231 :group 'killing) | 1232 :group 'killing |
| 1233 :version "24.1") | |
| 1232 | 1234 |
| 1233 (defun x-select-text (text &optional push) | 1235 (defun x-select-text (text &optional push) |
| 1234 "Select TEXT, a string, according to the window system. | 1236 "Select TEXT, a string, according to the window system. |
| 1235 | 1237 |
| 1236 On X, put TEXT in the primary X selection. For backward | 1238 On X, put TEXT in the primary X selection. For backward |