comparison lisp/wid-edit.el @ 107617:c5f9e4613394

Merge from mainline.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 16 Jan 2010 06:57:09 -0500
parents 49daa9e9669f
children c97f25cea7c4 424a3703328f
comparison
equal deleted inserted replaced
107616:fa5ad3eee9f5 107617:c5f9e4613394
1 ;;; wid-edit.el --- Functions for creating and using widgets -*-byte-compile-dynamic: t;-*- 1 ;;; wid-edit.el --- Functions for creating and using widgets -*-byte-compile-dynamic: t;-*-
2 ;; 2 ;;
3 ;; Copyright (C) 1996, 1997, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 3 ;; Copyright (C) 1996, 1997, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
4 ;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc. 4 ;; 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
5 ;; 5 ;;
6 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk> 6 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
7 ;; Maintainer: FSF 7 ;; Maintainer: FSF
8 ;; Keywords: extensions 8 ;; Keywords: extensions
9 9
873 ;; The following definition needs to avoid using escape sequences that 873 ;; The following definition needs to avoid using escape sequences that
874 ;; might get converted to ^M when building loaddefs.el 874 ;; might get converted to ^M when building loaddefs.el
875 (define-key map [(control ?m)] 'widget-button-press) 875 (define-key map [(control ?m)] 'widget-button-press)
876 map) 876 map)
877 "Keymap containing useful binding for buffers containing widgets. 877 "Keymap containing useful binding for buffers containing widgets.
878 Recommended as a parent keymap for modes using widgets.") 878 Recommended as a parent keymap for modes using widgets.
879 Note that such modes will need to require wid-edit.")
879 880
880 (defvar widget-global-map global-map 881 (defvar widget-global-map global-map
881 "Keymap used for events a widget does not handle itself.") 882 "Keymap used for events a widget does not handle itself.")
882 (make-variable-buffer-local 'widget-global-map) 883 (make-variable-buffer-local 'widget-global-map)
883 884