From: morioka <morioka>
Date: Wed, 10 Feb 1999 09:06:37 +0000 (+0000)
Subject: (mel-define-service): Change size of obarray to 7.
X-Git-Tag: flim-1_12_5_1~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=11af043d04e1994ca8f84cdca65dc014ad032930;p=elisp%2Fflim.git

(mel-define-service): Change size of obarray to 7.
---

diff --git a/mime-def.el b/mime-def.el
index abaaed1..8720db1 100644
--- a/mime-def.el
+++ b/mime-def.el
@@ -443,7 +443,7 @@ If ARGS is specified, NAME is defined as a generic function for the
 service."
   `(progn
      (add-to-list 'mel-service-list ',name)
-     (defvar ,(intern (format "%s-obarray" name)) (make-vector 1 nil))
+     (defvar ,(intern (format "%s-obarray" name)) (make-vector 7 0))
      ,@(if args
 	   `((defun ,name ,args
 	       ,@rest