[Emacs-diffs] master b60b6ff: cua-rect help: check for 'control value

[Lars Ingebrigtsen]

branch: master
commit b60b6ffb35f4ffbeecb73381e58712ff5cdd7e40
Author: Pierre-Yves Luyten <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    cua-rect help: check for 'control value
    
    * lisp/emulation/cua-rect.el (cua-help-for-rectangle): Check for
    'control value (bug#18120).
    
    Copyright-paperwork-exempt: yes
---
 lisp/emulation/cua-rect.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el
index 1a19cc2..1441558 100644
--- a/lisp/emulation/cua-rect.el
+++ b/lisp/emulation/cua-rect.el
@@ -1362,6 +1362,7 @@ With prefix arg, indent to that column."
   (let ((M (cond ((eq cua--rectangle-modifier-key 'hyper) " H-")
                 ((eq cua--rectangle-modifier-key 'super) " s-")
                 ((eq cua--rectangle-modifier-key 'alt) " A-")
+                 ((eq cua--rectangle-modifier-key 'control) " C-")
                 (t " M-"))))
     (message
      (concat (if help "C-?:help" "")