[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r102844: * emulation/cua-base.el (cua
From: |
Kim F. Storm |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r102844: * emulation/cua-base.el (cua--init-keymaps): |
Date: |
Fri, 14 Jan 2011 16:06:17 +0100 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 102844
committer: Kim F. Storm <address@hidden>
branch nick: trunk
timestamp: Fri 2011-01-14 16:06:17 +0100
message:
* emulation/cua-base.el (cua--init-keymaps):
Remap exchange-point-and-mark in cua-global-keymap.
modified:
lisp/ChangeLog
lisp/emulation/cua-base.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-01-14 12:17:24 +0000
+++ b/lisp/ChangeLog 2011-01-14 15:06:17 +0000
@@ -1,3 +1,8 @@
+2011-01-14 Kim F. Storm <address@hidden>
+
+ * emulation/cua-base.el (cua--init-keymaps):
+ Remap exchange-point-and-mark in cua-global-keymap.
+
2011-01-14 Tassilo Horn <address@hidden>
* progmodes/sh-script.el (sh-other-keywords): Add ZSH's foreach
=== modified file 'lisp/emulation/cua-base.el'
--- a/lisp/emulation/cua-base.el 2010-10-22 04:03:55 +0000
+++ b/lisp/emulation/cua-base.el 2011-01-14 15:06:17 +0000
@@ -1438,6 +1438,7 @@
(define-key cua-global-keymap [remap yank-pop] 'cua-paste-pop)
;; set mark
(define-key cua-global-keymap [remap set-mark-command] 'cua-set-mark)
+ (define-key cua-global-keymap [remap exchange-point-and-mark]
'cua-exchange-point-and-mark)
;; scrolling
(define-key cua-global-keymap [remap scroll-up] 'cua-scroll-up)
@@ -1452,7 +1453,6 @@
(when cua-remap-control-v
(define-key cua--cua-keys-keymap [(control v)] 'yank)
(define-key cua--cua-keys-keymap [(meta v)] 'cua-repeat-replace-region))
- (define-key cua--cua-keys-keymap [remap exchange-point-and-mark]
'cua-exchange-point-and-mark)
(define-key cua--prefix-override-keymap [(control x)]
'cua--prefix-override-handler)
(define-key cua--prefix-override-keymap [(control c)]
'cua--prefix-override-handler)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r102844: * emulation/cua-base.el (cua--init-keymaps):,
Kim F. Storm <=