Fix the desired binding for comment-line

* bindings.el (ctl-x-map): Use [?\C-\;] to get the desired binding.
Fixes: bug#19826

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6352d77ca3a58baeaa68eadd6f9d2c04039e099d..c1fb8697707f1875132a6b788fa16db89f80a093 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2015-02-23  Paul Eggert  <eggert@cs.ucla.edu>
+
+       Fix the desired binding for comment-line
+       * bindings.el (ctl-x-map): Use [?\C-\;] to get the desired binding.
+       Fixes: bug#19826
+
 2015-02-23  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * emacs-lisp/macroexp.el (macroexp-parse-body): Handle cl-declare

diff --git a/lisp/bindings.el b/lisp/bindings.el
index a1f0d987f5c29f7e50761bb0a43183207bc54008..b658914c454ba73f1f72e8df9a69aeb6a8264d4e 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -1130,7 +1130,7 @@ if `inhibit-field-text-motion' is non-nil."
 (define-key esc-map "j" 'indent-new-comment-line)
 (define-key esc-map "\C-j" 'indent-new-comment-line)
 (define-key ctl-x-map ";" 'comment-set-column)
-(define-key ctl-x-map "\M-;" 'comment-line)
+(define-key ctl-x-map [?\C-\;] 'comment-line)
 (define-key ctl-x-map "f" 'set-fill-column)
 (define-key ctl-x-map "$" 'set-selective-display)