Mercurial > emacs
changeset 71906:4a6411420a60
(cua-help-for-rectangle): Add `alt' modifier.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Fri, 14 Jul 2006 22:14:17 +0000 |
| parents | 8e9a2b05bd3d |
| children | 3f05b471ac55 |
| files | lisp/emulation/cua-rect.el |
| diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/cua-rect.el Fri Jul 14 22:14:08 2006 +0000 +++ b/lisp/emulation/cua-rect.el Fri Jul 14 22:14:17 2006 +0000 @@ -1361,6 +1361,7 @@ (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" "")