From bb55f90e4acf87076d743298ecb64eabb1b39993 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 15 Feb 2006 02:41:02 +0000 Subject: [PATCH] * wid-edit.el (widget-keymap): Bind down-mouse-1 to widget-button-click. * cus-edit.el (custom-mode-map): Remove mouse-1 binding. --- lisp/ChangeLog | 6 ++++++ lisp/cus-edit.el | 1 - lisp/wid-edit.el | 1 + 3 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 10b4816e9e7..438907164b8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,10 @@ 2006-02-14 Chong Yidong + * wid-edit.el (widget-keymap): Bind down-mouse-1 to + widget-button-click. + + * cus-edit.el (custom-mode-map): Remove mouse-1 binding. + * files.el (hack-local-variables-confirm): Allow scrolling if the file variable list is too long. Kill temp buffer after use. @@ -35,6 +40,7 @@ * files.el (hack-local-variables): Remove ignored variables before checking if any variables need setting. +>>>>>>> 1.9141 2006-02-14 Jan Dj,Ad(Brv * cus-start.el (all): Add x-gtk-whole-detached-tool-bar. diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 0595336c3ed..87e902ac65e 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -4369,7 +4369,6 @@ The format is suitable for use with `easy-menu-define'." (define-key map "u" 'Custom-goto-parent) (define-key map "n" 'widget-forward) (define-key map "p" 'widget-backward) - (define-key map [mouse-1] 'widget-move-and-invoke) map) "Keymap for `custom-mode'.") diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 52bf3a212be..659c562ea65 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -860,6 +860,7 @@ button end points." (define-key map [(shift tab)] 'advertised-widget-backward) (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) map) "Keymap containing useful binding for buffers containing widgets. -- 2.39.2