mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

* button.el (button-map):

Browse Source 
* wid-edit.el (widget-keymap): Avoid line-end confusion in autoloads.
This commit is contained in:
Jason Rumney 2008-02-09 22:48:06 +00:00
parent 0bd4f3175d
commit 2b786e078b
3 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2008-02-09 Jason Rumney <jasonr@gnu.org>
* button.el (button-map):
* wid-edit.el (widget-keymap): Avoid line-end confusion in autoloads.
2008-02-09 Dan Nicolaescu <dann@ics.uci.edu>
* epa.el (epa-faces, epa):

4
lisp/button.el
View File

@ -64,7 +64,9 @@
;;;###autoload
(defvar button-map
(let ((map (make-sparse-keymap)))
(define-key map "\r" 'push-button)
;; The following definition needs to avoid using escape sequences that
;; might get converted to ^M when building loaddefs.el
(define-key map [(control ?m)] 'push-button)
(define-key map [mouse-2] 'push-button)
map)
"Keymap used by buttons.")

4
lisp/wid-edit.el
View 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.")