3 ;; FLIM-MK: installer for FLIM.
8 (let (prefix lisp-dir version-specific-lisp-dir)
9 (and (setq prefix (car command-line-args-left))
10 (or (string-equal "NONE" prefix)
11 (defvar PREFIX prefix)
13 (setq command-line-args-left (cdr command-line-args-left))
14 (and (setq lisp-dir (car command-line-args-left))
15 (or (string-equal "NONE" lisp-dir)
16 (defvar LISPDIR lisp-dir)
18 (setq command-line-args-left (cdr command-line-args-left))
19 (and (setq version-specific-lisp-dir (car command-line-args-left))
20 (or (string-equal "NONE" version-specific-lisp-dir)
22 (defvar VERSION_SPECIFIC_LISPDIR version-specific-lisp-dir)
23 (princ (format "VERSION_SPECIFIC_LISPDIR=%s\n"
24 VERSION_SPECIFIC_LISPDIR)))
26 (setq command-line-args-left (cdr command-line-args-left))
27 (load-file "FLIM-CFG")
28 (load-file "FLIM-ELS")
29 (princ (format "PREFIX=%s
30 LISPDIR=%s\n" PREFIX LISPDIR))
33 (defun compile-flim ()
35 (compile-elisp-modules flim-modules ".")
38 (defun install-flim ()
40 (install-elisp-modules flim-modules "./" FLIM_DIR)
43 (defun config-flim-package ()
45 (and (setq package-dir (car command-line-args-left))
46 (or (string= "NONE" package-dir)
47 (defvar PACKAGEDIR package-dir)
49 (setq command-line-args-left (cdr command-line-args-left))
50 (load-file "FLIM-CFG")
51 (load-file "FLIM-ELS")
52 (setq flim-modules (append flim-modules
53 '(auto-autoloads custom-load)))
54 (princ (format "PACKAGEDIR=%s\n" PACKAGEDIR))
57 (defun compile-flim-package ()
60 (setq autoload-package-name "flim")
61 (add-to-list 'command-line-args-left ".")
62 (batch-update-directory)
64 (add-to-list 'command-line-args-left ".")
65 (Custom-make-dependencies)
67 (compile-elisp-modules flim-modules ".")
70 (defun install-flim-package ()
72 (install-elisp-modules flim-modules
74 (expand-file-name FLIM_PREFIX
75 (expand-file-name "lisp"