3 ;; TOMOYO-MK: installer for TOMOYO.
7 (defun config-tomoyo-package ()
9 (and (setq package-dir (car command-line-args-left))
10 (or (string= "NONE" package-dir)
11 (defvar PACKAGEDIR package-dir)
13 (setq command-line-args-left (cdr command-line-args-left))
14 (load-file "TOMOYO-CFG")
15 (load-file "TOMOYO-ELS")
17 (princ (format "PACKAGEDIR=%s\n" PACKAGEDIR))
20 (defun compile-tomoyo-package ()
21 (config-tomoyo-package)
23 (setq autoload-package-name "tomoyo")
24 (add-to-list 'command-line-args-left ".")
25 (batch-update-directory)
27 (add-to-list 'command-line-args-left ".")
28 (Custom-make-dependencies)
30 (compile-elisp-modules (append tomoyo-modules-to-compile
31 '(auto-autoloads custom-load))
35 (defun install-tomoyo-package ()
36 (config-tomoyo-package)
37 (install-elisp-modules (append tomoyo-modules
38 '(auto-autoloads custom-load))
40 (expand-file-name TOMOYO_PREFIX
41 (expand-file-name "lisp"
43 (delete-file "./auto-autoloads.el")
45 (delete-file "./custom-load.el")
49 ;;; TOMOYO-MK ends here