Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-category.el @ 442:abe6d1db359e r21-2-36

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-36
author cvs
date Mon, 13 Aug 2007 11:35:02 +0200
parents 8de8e3f6228a
children 576fb035e263
comparison
equal deleted inserted replaced
441:72a7cfa4a488 442:abe6d1db359e
33 ;; at the end of this file comes from Mule. 33 ;; at the end of this file comes from Mule.
34 ;; Some bugfixes by Jareth Hein <jhod@po.iijnet.or.jp> 34 ;; Some bugfixes by Jareth Hein <jhod@po.iijnet.or.jp>
35 35
36 ;;; Code: 36 ;;; Code:
37 37
38 (defvar defined-category-hashtable (make-hashtable 50)) 38 (defvar defined-category-hashtable (make-hash-table :size 50))
39 39
40 (defun define-category (designator doc-string) 40 (defun define-category (designator doc-string)
41 "Make a new category whose designator is DESIGNATOR. 41 "Make a new category whose designator is DESIGNATOR.
42 DESIGNATOR should be a visible letter of ' ' thru '~'. 42 DESIGNATOR should be a visible letter of ' ' thru '~'.
43 STRING is a doc string for the category. 43 STRING is a doc string for the category.