*** empty log message ***
authormorioka <morioka>
Tue, 18 Mar 1997 16:34:00 +0000 (16:34 +0000)
committermorioka <morioka>
Tue, 18 Mar 1997 16:34:00 +0000 (16:34 +0000)
EMH-MK [new file with mode: 0644]

diff --git a/EMH-MK b/EMH-MK
new file mode 100644 (file)
index 0000000..2d7564e
--- /dev/null
+++ b/EMH-MK
@@ -0,0 +1,30 @@
+;;; -*-Emacs-Lisp-*-
+;;;
+;;; $Id: EMH-MK,v 0.0 1997-03-18 16:34:00 morioka Exp $
+;;;
+
+(defun config-emh ()
+  (let (prefix)
+    (setq prefix (car command-line-args-left))
+    (and prefix
+        (not (string-equal "NONE" prefix))
+        (progn
+          (defvar PREFIX prefix)
+          (setq command-line-args-left (cdr command-line-args-left))
+          ))
+    (load-file "EMH-CFG")
+    (load-file "EMH-ELS")
+    (princ (format "PREFIX=%s\n" PREFIX))
+    ))
+
+(defun compile-emh ()
+  (config-emh)
+  (compile-elisp-modules emh-modules ".")
+  )
+
+(defun install-emh ()
+  (config-emh)
+  (install-elisp-modules emh-modules "./" EMH_DIR)
+  )
+
+;;; EMH-MK ends here