Mercurial > emacs
comparison lisp/widget.el @ 18258:e83bc8150072
Synched with 1.9920.
author | Per Abrahamsen <abraham@dina.kvl.dk> |
---|---|
date | Sun, 15 Jun 1997 15:31:32 +0000 |
parents | ee3c0d09dcd3 |
children | 148cbe18165c |
comparison
equal
deleted
inserted
replaced
18257:34f1f8c5eda3 | 18258:e83bc8150072 |
---|---|
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.9908 | 7 ;; Version: 1.9920 |
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 |