Function `call-after-loaded' was moved to mime-def.el; require

mime-def.

diff --git a/semi-setup.el b/semi-setup.el
index b69e69b..8c8ab9b 100644 (file)
--- a/semi-setup.el
+++ b/semi-setup.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: semi-setup.el,v 0.6 1997-02-28 04:44:27 tmorioka Exp $
+;; Version: $Id: semi-setup.el,v 0.7 1997-02-28 04:49:40 tmorioka Exp $
 ;; Keywords: mail, news, MIME, multimedia, multilingual, encoded-word
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -25,28 +25,13 @@
 
 ;;; Code:
 
+(require 'mime-def)
+
 (eval-when-compile
   (require 'mime-play)
   )
 
 
-;;; @ Utility
-;;;
-
-(defun call-after-loaded (module func &optional hook-name)
-  "If MODULE is provided, then FUNC is called.
-Otherwise func is set to MODULE-load-hook.
-If optional argument HOOK-NAME is specified,
-it is used as hook to set."
-  (if (featurep module)
-      (funcall func)
-    (or hook-name
-       (setq hook-name (intern (concat (symbol-name module) "-load-hook")))
-       )
-    (add-hook hook-name func)
-    ))
-
-
 ;;; @ for mime-view
 ;;;