comparison lisp/custom/widget.el @ 163:0132846995bd r20-3b8

Import from CVS: tag r20-3b8
author cvs
date Mon, 13 Aug 2007 09:43:35 +0200
parents 28f395d8dc7a
children 5a88923fcbfe
comparison
equal deleted inserted replaced
162:4de2936b4e77 163:0132846995bd
2 ;; 2 ;;
3 ;; Copyright (C) 1996, 1997 Free Software Foundation, Inc. 3 ;; Copyright (C) 1996, 1997 Free Software Foundation, Inc.
4 ;; 4 ;;
5 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk> 5 ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
6 ;; Keywords: help, extensions, faces, hypermedia 6 ;; Keywords: help, extensions, faces, hypermedia
7 ;; Version: 1.9916 7 ;; Version: 1.9931
8 ;; X-URL: http://www.dina.kvl.dk/~abraham/custom/ 8 ;; X-URL: http://www.dina.kvl.dk/~abraham/custom/
9 9
10 ;; This file is part of GNU Emacs. 10 ;; This file is part of GNU Emacs.
11 11
12 ;; GNU Emacs is free software; you can redistribute it and/or modify 12 ;; GNU Emacs is free software; you can redistribute it and/or modify
42 (while keywords 42 (while keywords
43 (or (boundp (car keywords)) 43 (or (boundp (car keywords))
44 (set (car keywords) (car keywords))) 44 (set (car keywords) (car keywords)))
45 (setq keywords (cdr keywords))))))) 45 (setq keywords (cdr keywords)))))))
46 46
47 (define-widget-keywords :complete-function :complete :button-overlay 47 (define-widget-keywords :documentation-indent
48 :complete-function :complete :button-overlay
48 :field-overlay 49 :field-overlay
49 :documentation-shown :button-prefix 50 :documentation-shown :button-prefix
50 :button-suffix :mouse-down-action :glyph-up :glyph-down :glyph-inactive 51 :button-suffix :mouse-down-action :glyph-up :glyph-down :glyph-inactive
51 :prompt-internal :prompt-history :prompt-match 52 :prompt-internal :prompt-history :prompt-match
52 :prompt-value :deactivate :active 53 :prompt-value :deactivate :active