]> code.delx.au - gnu-emacs/blobdiff - lisp/wid-edit.el
*** empty log message ***
[gnu-emacs] / lisp / wid-edit.el
index 205f70d32ef6d80f5c6990c23dd85444bc2458ec..26c77e1a172ea30b9f3a0832fff1b66373e5247d 100644 (file)
@@ -874,7 +874,9 @@ button end points."
     (define-key map [backtab] 'widget-backward)
     (define-key map [down-mouse-2] 'widget-button-click)
     (define-key map [down-mouse-1] 'widget-button-click)
-    (define-key map "\C-m" 'widget-button-press)
+    ;; The following definition needs to avoid using escape sequences that
+    ;; might get converted to ^M when building loaddefs.el
+    (define-key map [(control ?m)] 'widget-button-press)
     map)
   "Keymap containing useful binding for buffers containing widgets.
 Recommended as a parent keymap for modes using widgets.")