*** empty log message ***
[elisp/emh.git] / EMH-MK
1 ;;; -*-Emacs-Lisp-*-
2 ;;;
3 ;;; $Id: EMH-MK,v 0.0 1997-03-18 16:34:00 morioka Exp $
4 ;;;
5
6 (defun config-emh ()
7   (let (prefix)
8     (setq prefix (car command-line-args-left))
9     (and prefix
10          (not (string-equal "NONE" prefix))
11          (progn
12            (defvar PREFIX prefix)
13            (setq command-line-args-left (cdr command-line-args-left))
14            ))
15     (load-file "EMH-CFG")
16     (load-file "EMH-ELS")
17     (princ (format "PREFIX=%s\n" PREFIX))
18     ))
19
20 (defun compile-emh ()
21   (config-emh)
22   (compile-elisp-modules emh-modules ".")
23   )
24
25 (defun install-emh ()
26   (config-emh)
27   (install-elisp-modules emh-modules "./" EMH_DIR)
28   )
29
30 ;;; EMH-MK ends here