Mercurial > hg > xemacs-beta

comparison lisp/custom/widget.el @ 165:5a88923fcbfe r20-3b9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b9
author cvs
date Mon, 13 Aug 2007 09:44:42 +0200
parents 0132846995bd
children 85ec50267440
comparison
equal deleted inserted replaced
164:4e0740e5aab2 165:5a88923fcbfe
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.9931 7 ;; Version: 1.9937
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 :documentation-indent 47 (define-widget-keywords :match-alternatives :documentation-indent
48 :complete-function :complete :button-overlay 48 :complete-function :complete :button-overlay
49 :field-overlay 49 :field-overlay
50 :documentation-shown :button-prefix 50 :documentation-shown :button-prefix
51 :button-suffix :mouse-down-action :glyph-up :glyph-down :glyph-inactive 51 :button-suffix :mouse-down-action :glyph-up :glyph-down :glyph-inactive
52 :prompt-internal :prompt-history :prompt-match 52 :prompt-internal :prompt-history :prompt-match