From 00eaae925515d8e5e6a0a84adfe2740b9815d61d Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Sun, 13 Sep 1998 06:17:10 +0000
Subject: [PATCH] Abolish function `compile-apel-package'.
 (install-apel-package): Update auto-autoloads.el and
 custom-load.el at target directory.

---
 APEL-MK |   40 +++++++++++++++-------------------------
 1 file changed, 15 insertions(+), 25 deletions(-)

diff --git a/APEL-MK b/APEL-MK
index 9543ffd..a173c00 100644
--- a/APEL-MK
+++ b/APEL-MK
@@ -54,34 +54,24 @@
     (princ (format "PACKAGEDIR=%s\n" PACKAGEDIR))
     ))
 
-(defun compile-apel-package ()
+(defun install-apel-package ()
   (config-apel-package)
   (load "EMU-ELS")
-  (load-file "APEL-ELS")
-  
-  (setq autoload-package-name "apel")
-  (add-to-list 'command-line-args-left ".")
-  (batch-update-directory)
-
-  (add-to-list 'command-line-args-left ".")
-  (Custom-make-dependencies)
+  (let ((dir (expand-file-name APEL_PREFIX
+			       (expand-file-name "lisp"
+						 PACKAGEDIR))))
+    (install-elisp-modules emu-modules	"." dir)
+    (install-elisp-modules apel-modules	"." dir)
+    
+    (setq autoload-package-name "apel")
+    (add-to-list 'command-line-args-left dir)
+    (batch-update-directory)
 
-  (compile-elisp-modules emu-modules	".")
-  (compile-elisp-modules (append apel-modules
-				 '(auto-autoloads custom-load))
-			 ".")
-  )
+    (add-to-list 'command-line-args-left dir)
+    (Custom-make-dependencies)
 
-(defun install-apel-package ()
-  (config-apel-package)
-  (load "EMU-ELS")
-  (install-elisp-modules (append emu-modules
-				 apel-modules
-				 '(mime auto-autoloads custom-load))
-			 "./"
-			 (expand-file-name APEL_PREFIX
-					   (expand-file-name "lisp"
-							     PACKAGEDIR)))
-  )
+    (byte-compile-file (expand-file-name "auto-autoloads.el" dir))
+    (byte-compile-file (expand-file-name "custom-load.el" dir))
+    ))
 
 ;;; APEL-MK ends here
-- 
1.7.10.4