/[emacs]/emacs/lisp/facemenu.el
ViewVC logotype

Diff of /emacs/lisp/facemenu.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.58 by abraham, Thu Feb 14 16:47:11 2002 UTC revision 1.59 by abraham, Tue Feb 19 10:30:30 2002 UTC
# Line 478  These special properties include `invisi Line 478  These special properties include `invisi
478    
479  (defvar describe-text-mode-map  (defvar describe-text-mode-map
480    (let ((map (make-sparse-keymap)))    (let ((map (make-sparse-keymap)))
481      (if (boundp 'widget-keymap)      (set-keymap-parent map widget-keymap)
         (set-keymap-parent map widget-keymap)  
       ;; Copy from wid-edit.el if widget-keymap isn't in loaddefs.el  
       ;; Needed for bootstrap purposes, can hopefully be removed when  
       ;; loaddefs.el is updated.  
       ;; -- Per Abrahamsen <abraham@dina.kvl.dk>, 2002-02-14.  
       (define-key map "\t" 'widget-forward)  
       (define-key map [(shift tab)] 'widget-backward)  
       (define-key map [backtab] 'widget-backward)  
       (define-key map [down-mouse-2] 'widget-button-click)  
       (define-key map "\C-m" 'widget-button-press))  
     (define-key map "q" 'describe-text-done)  
482      map)      map)
483    "Keymap for `describe-text-mode'.")    "Keymap for `describe-text-mode'.")
484        

Legend:
Removed from v.1.58  
changed lines
  Added in v.1.59

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26