Commit b60b6ffb authored by Pierre-Yves Luyten's avatar Pierre-Yves Luyten Committed by Lars Ingebrigtsen
Browse files

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
parent 2e29a258
Pipeline #2734 failed with stage
in 90 minutes and 3 seconds
......@@ -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" "")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment