tm 6.78.1.
[elisp/tm.git] / mh-e / mk-tmh
index 4d2fa1b..822e267 100644 (file)
@@ -10,6 +10,7 @@
                 load-path))
 
 (require 'mh-e)
+(require 'emu)
 
 (setq tm-mh-e-modules
       (append
@@ -70,6 +71,9 @@
 (defun install-tm-mh-e ()
   (let ((path (car command-line-args-left)))
     (princ (format "%s\n" emacs-version))
+    (if (not (file-exists-p path))
+       (make-directory path t)
+      )
     (apply (function install-el-files) path tm-mh-e-el-files)
     (apply (function install-elc-files) path tm-mh-e-elc-files)
     ))