From: morioka <morioka>
Date: Thu, 20 Mar 1997 02:12:39 +0000 (+0000)
Subject: (install-apel): Use `compile-apel'.
X-Git-Tag: XEmacs-20_3-b6~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1a7da2dc62ba0251a1f829c692ee19afff607ca1;p=elisp%2Fapel.git

(install-apel): Use `compile-apel'.
---

diff --git a/APEL-MK b/APEL-MK
index 17c2c6b..61902fe 100644
--- a/APEL-MK
+++ b/APEL-MK
@@ -1,6 +1,6 @@
 ;;; -*-Emacs-Lisp-*-
 ;;;
-;;; $Id: APEL-MK,v 0.1 1997-03-20 02:04:19 morioka Exp $
+;;; $Id: APEL-MK,v 0.2 1997-03-20 02:12:39 morioka Exp $
 ;;;
 
 (defun config-apel ()
@@ -12,21 +12,23 @@
 	   (defvar PREFIX prefix)
 	   (setq command-line-args-left (cdr command-line-args-left))
 	   ))
-    (add-to-list 'load-path (expand-file-name "../emu"))
-    (add-to-list 'load-path ".")
-    (require 'install)
-    
     (load-file "APEL-CFG")
-    (load-file "APEL-ELS")
+    (or (boundp 'apel-modules)
+	(load-file "APEL-ELS")
+	)
     (princ (format "PREFIX=%s\n" PREFIX))
     ))
 
 (defun compile-apel ()
-  (config-apel)
+  (add-to-list 'load-path (expand-file-name "../emu"))
+  (add-to-list 'load-path ".")
+  (require 'install)
+  (load-file "APEL-ELS")
   (compile-elisp-modules apel-modules	".")
   )
 
 (defun install-apel ()
+  (compile-apel)
   (config-apel)
   (compile-elisp-modules apel-modules	".")
   (install-elisp-modules apel-modules	"."	APEL_DIR)