Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-category.el @ 410:de805c49cfc1 r21-2-35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents 74fd4e045ea6
children 697ef44129c6
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
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.