diff options
| author | Kim F. Storm | 2004-05-03 14:26:23 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2004-05-03 14:26:23 +0000 |
| commit | ef2887a290f52844163e33662d7c0180d2b3cbbe (patch) | |
| tree | a8529e14af0b70ac55743045739fabd1ad309348 /lisp/emulation | |
| parent | a6133defd6351475ff9e1c518a173632f6ae7b14 (diff) | |
| download | emacs-ef2887a290f52844163e33662d7c0180d2b3cbbe.tar.gz emacs-ef2887a290f52844163e33662d7c0180d2b3cbbe.zip | |
(cua-mode): Deactivate mark when cua-mode is enabled.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/cua-base.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index 6a0e8a00cde..51b47b104d0 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el | |||
| @@ -1336,6 +1336,7 @@ paste (in addition to the normal emacs bindings)." | |||
| 1336 | (delete-selection-mode -1)) | 1336 | (delete-selection-mode -1)) |
| 1337 | (if (and (boundp 'pc-selection-mode) pc-selection-mode) | 1337 | (if (and (boundp 'pc-selection-mode) pc-selection-mode) |
| 1338 | (pc-selection-mode -1)) | 1338 | (pc-selection-mode -1)) |
| 1339 | (cua--deactivate) | ||
| 1339 | (setq transient-mark-mode (and cua-mode | 1340 | (setq transient-mark-mode (and cua-mode |
| 1340 | (if cua-highlight-region-shift-only | 1341 | (if cua-highlight-region-shift-only |
| 1341 | (not cua--explicit-region-start) | 1342 | (not cua--explicit-region-start) |