procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(define-widget): Don't use declare for the doc-string-elt.

Browse source
This commit is contained in:
Stefan Monnier 2005-11-21 00:02:31 +00:00
parent 45aacac640
commit 74b99d45fd
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2005-11-20 Martin Rudalics <rudalics@gmx.at> (tiny change)
* custom.el (defgroup): Add doc-string-elt info.
* widget.el (define-widget): Don't use declare for the doc-string-elt.
2005-11-20 Stefan Monnier <monnier@iro.umontreal.ca>
* newcomment.el (comment-enter-backward): Fix last fix.

2
lisp/widget.el
View file

@ -71,6 +71,7 @@
;; :button-face-get :button-face :value-face :keymap :entry-from
;; :entry-to :help-echo :documentation-property :tab-order)
(put 'define-widget 'doc-string-elt 3) ;`declare' doesn't work in functions.
(defun define-widget (name class doc &rest args)
"Define a new widget type named NAME from CLASS.
@ -85,7 +86,6 @@ create identical widgets:
* (apply 'widget-create CLASS ARGS)
The third argument DOC is a documentation string for the widget."
(declare (doc-string 3))
(put name 'widget-type (cons class args))
(put name 'widget-documentation doc)
name)