From: minakaji <minakaji>
Date: Sat, 23 Jun 2001 04:59:19 +0000 (+0000)
Subject: * install.el (install-elisp-modules): Do not make DEST directory
X-Git-Tag: apel-10_3-1~16
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fapel.git;a=commitdiff_plain;h=0c172e7483018c6c6c3423eed89c3e99b232cace;hp=4a816b66bd781e2851608d7f66563a75dc4093d8

* install.el (install-elisp-modules): Do not make DEST directory
when JUST-PRINT is non-nil.
---

diff --git a/ChangeLog b/ChangeLog
index 566e2ec..026f7bb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-06-20  Akihiro MOTOKI <amotoki@dd.iij4u.or.jp>
+
+	* install.el (install-elisp-modules): Do not make DEST directory
+	when JUST-PRINT is non-nil.
+
 2001-06-01  Tanaka Akira      <akr@m17n.org>
 
 	* pccl.el (ccl-compat): Since mule 2.3 accepts `t' and `nil' as `type'
diff --git a/install.el b/install.el
index 04c026a..775c259 100644
--- a/install.el
+++ b/install.el
@@ -120,7 +120,8 @@
 	    (princ (format "%s -> %s\n" elc-file dest))))))))
 
 (defun install-elisp-modules (modules src dest &optional just-print)
-  (or (file-exists-p dest)
+  (or just-print
+      (file-exists-p dest)
       (make-directory dest t))
   (mapcar
    (function