Mercurial > emacs
comparison lisp/ldefs-boot.el @ 68619:e5bed647674d
(widget-keymap): Fix corrupted value.
author | Luc Teirlinck <teirllm@auburn.edu> |
---|---|
date | Sun, 05 Feb 2006 03:42:36 +0000 |
parents | 3b73d52b2fd6 |
children | 2313f6def361 |
comparison
equal
deleted
inserted
replaced
68618:81c8febfc4e8 | 68619:e5bed647674d |
---|---|
29926 | 29926 |
29927 \(fn &rest ARGS)" nil nil) | 29927 \(fn &rest ARGS)" nil nil) |
29928 | 29928 |
29929 (defalias (quote advertised-widget-backward) (quote widget-backward)) | 29929 (defalias (quote advertised-widget-backward) (quote widget-backward)) |
29930 | 29930 |
29931 (defvar widget-keymap (let ((map (make-sparse-keymap))) (define-key map " " (quote widget-forward)) (define-key map " " (quote widget-backward)) (define-key map [(shift tab)] (quote advertised-widget-backward)) (define-key map [backtab] (quote widget-backward)) (define-key map [down-mouse-2] (quote widget-button-click)) (define-key map "" (quote widget-button-press)) map) "\ | 29931 (defvar widget-keymap (let ((map (make-sparse-keymap))) (define-key map " " (quote widget-forward)) (define-key map " " (quote widget-backward)) (define-key map [(shift tab)] (quote advertised-widget-backward)) (define-key map [backtab] (quote widget-backward)) (define-key map [down-mouse-2] (quote widget-button-click)) (define-key map " |
29932 " (quote widget-button-press)) map) "\ | |
29932 Keymap containing useful binding for buffers containing widgets. | 29933 Keymap containing useful binding for buffers containing widgets. |
29933 Recommended as a parent keymap for modes using widgets.") | 29934 Recommended as a parent keymap for modes using widgets.") |
29934 | 29935 |
29935 (autoload (quote widget-setup) "wid-edit" "\ | 29936 (autoload (quote widget-setup) "wid-edit" "\ |
29936 Setup current buffer so editing string widgets works. | 29937 Setup current buffer so editing string widgets works. |