Mercurial > emacs
changeset 51587:d7e174e9d6eb
(cua-mode): Use explicit arg to turn off minor modes.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 16 Jun 2003 17:24:45 +0000 |
| parents | c76c8cde2476 |
| children | fc00b549e161 |
| files | lisp/emulation/cua-base.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/cua-base.el Mon Jun 16 16:56:05 2003 +0000 +++ b/lisp/emulation/cua-base.el Mon Jun 16 17:24:45 2003 +0000 @@ -1,6 +1,6 @@ ;;; cua-base.el --- emulate CUA key bindings -;; Copyright (C) 1997-2002 Free Software Foundation, Inc. +;; Copyright (C) 1997,98,99,200,01,02,03 Free Software Foundation, Inc. ;; Author: Kim F. Storm <storm@cua.dk> ;; Keywords: keyboard emulation convenience cua @@ -1204,9 +1204,9 @@ (and (boundp 'delete-selection-mode) delete-selection-mode) (and (boundp 'pc-selection-mode) pc-selection-mode))) (if (and (boundp 'delete-selection-mode) delete-selection-mode) - (delete-selection-mode)) + (delete-selection-mode -1)) (if (and (boundp 'pc-selection-mode) pc-selection-mode) - (pc-selection-mode)) + (pc-selection-mode -1)) (setq transient-mark-mode (and cua-mode (if cua-highlight-region-shift-only (not cua--explicit-region-start)