Mercurial > hg > xemacs-beta
comparison lisp/toolbar.el @ 408:501cfd01ee6d r21-2-34
Import from CVS: tag r21-2-34
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:18:11 +0200 |
parents | 74fd4e045ea6 |
children | de805c49cfc1 |
comparison
equal
deleted
inserted
replaced
407:ed6218a7d4d3 | 408:501cfd01ee6d |
---|---|
196 | 196 |
197 (defun release-previous-toolbar-button (event) | 197 (defun release-previous-toolbar-button (event) |
198 (setq zmacs-region-stays t) | 198 (setq zmacs-region-stays t) |
199 (release-toolbar-button-internal event nil)) | 199 (release-toolbar-button-internal event nil)) |
200 | 200 |
201 (defun make-toolbar-specifier (spec-list) | |
202 "Return a new `toolbar' specifier object with the given specification list. | |
203 SPEC-LIST can be a list of specifications (each of which is a cons of a | |
204 locale and a list of instantiators), a single instantiator, or a list | |
205 of instantiators. See `make-specifier' for more information about | |
206 specifiers. | |
207 | |
208 Toolbar specifiers are used to specify the format of a toolbar. | |
209 The values of the variables `default-toolbar', `top-toolbar', | |
210 `left-toolbar', `right-toolbar', and `bottom-toolbar' are always | |
211 toolbar specifiers. | |
212 | |
213 Valid toolbar instantiators are called \"toolbar descriptors\" | |
214 and are lists of vectors. See `default-toolbar' for a description | |
215 of the exact format." | |
216 (make-specifier-and-init 'toolbar spec-list)) | |
217 | |
201 ;;; toolbar.el ends here | 218 ;;; toolbar.el ends here |