diff options
author | Kim F. Storm <storm@cua.dk> | 2006-07-14 22:14:17 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2006-07-14 22:14:17 +0000 |
commit | a452073597f33ca182b4f5cbf65f7f7887a15afb (patch) | |
tree | 5b78243f51639bd99bfba59479f10327128f5e15 /lisp/emulation/cua-rect.el | |
parent | ae6ffe9997fbfb58fed05eedadafd60370301db2 (diff) | |
download | emacs-a452073597f33ca182b4f5cbf65f7f7887a15afb.tar.gz |
(cua-help-for-rectangle): Add `alt' modifier.
Diffstat (limited to 'lisp/emulation/cua-rect.el')
-rw-r--r-- | lisp/emulation/cua-rect.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index 43a66fd0e3e..7db3cca8fae 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el @@ -1361,6 +1361,7 @@ With prefix arg, indent to that column." (interactive) (let ((M (cond ((eq cua--rectangle-modifier-key 'hyper) " H-") ((eq cua--rectangle-modifier-key 'super) " s-") + ((eq cua--rectangle-modifier-key 'alt) " A-") (t " M-")))) (message (concat (if help "C-?:help" "") |