This commit was generated by cvs2svn to compensate for changes in r434,

[elisp/tm.git] / inst-tm

diff --git a/inst-tm b/inst-tm
index 6387e40..c0ae129 100644 (file)
--- a/inst-tm
+++ b/inst-tm
@@ -1,6 +1,6 @@
 ;;; -*-Emacs-Lisp-*-
 ;;;
-;;; $Id: inst-tm,v 7.7 1996/06/27 15:49:37 morioka Exp $
+;;; $Id: inst-tm,v 7.8 1996/07/22 18:29:22 morioka Exp $
 ;;;
 
 (load-file "TM-CFG")
@@ -119,6 +119,9 @@
     ))
 
 (defun install-el-files (src dest &rest files)
+  (or (file-exists-p dest)
+      (make-directory dest t)
+      )
   (mapcar (function (lambda (file)
                      (install-el-file src dest file)
                      ))
@@ -149,9 +152,6 @@
          files))
 
 (defun install-el-and-elc-files (src dest el-files elc-files)
-  (if (not (file-exists-p dest))
-      (make-directory dest t)
-    )
   (apply (function install-el-files)  src dest el-files)
   (apply (function install-elc-files) src dest elc-files)
   )