3 ;;; $Id: SEMI-CFG,v 0.0 1997-02-22 17:30:15 morioka Exp $
6 (defvar default-load-path load-path)
7 (setq load-path (append
10 (expand-file-name path default-directory)
12 '("." "../emu" "../tl" "../bitmap-mule"
14 "../emh" "../gnus-mime" "../rmail-mime")
22 ;;; @ Please specify optional package directory if you use them.
25 ;; It is only necessary to use `add-path' if these packages are not
26 ;; already on the standard load-path of Emacs.
28 ;; Function `get-latest-path' detect latest version of such package
29 ;; under load-path directories. If you want to use a version of a
30 ;; package instead of latest version, please specify by argument of
31 ;; function `add-path'.
33 ;; Function `add-path' finds path under load-path directories. If a
34 ;; package does not exist in load-path, please specify by absolutely
35 ;; (`~/' is available), for example
36 ;; (add-path "~/lib/elisp/mailcrypt-3.4")
38 ;; (add-path "/opt/share/xmule/site-lisp/mailcrypt-3.4")
40 ;;; @@ Please specify VM path.
43 ;; Use latest version installed in load-path.
45 (let ((path (get-latest-path "vm" 'all-paths)))
50 ;; Or please specify path.
51 ;; (add-path "vm-5.95beta" 'all-paths)
54 ;;; @@ Please specify Mailcrypt path.
57 ;; Use latest version installed in load-path.
59 (let ((path (get-latest-path "mailcrypt" 'all-paths)))
64 ;; Or please specify path.
65 ;; (add-path "mailcrypt-3.4" 'all-paths)
68 ;;; @@ Please specify BBDB path.
71 (let ((path (get-latest-path "bbdb" 'all-paths)))
76 ;; Or please specify path.
77 ;; (add-path "bbdb-1.50" 'all-paths)
83 ;; Please specify shell command path.
85 (find-if (function file-exists-p)
86 '("/bin/sh" "/usr/bin/sh")
89 ;; Please specify shell command option.
90 (setq SHELLOPTION "-c")
93 ;;; @ Please specify prefix of install directory.
96 ;; Please specify install path prefix.
97 ;; If it is omitted, shared directory (maybe /usr/local is used).
98 (defvar PREFIX install-prefix)
101 ;; Please specify install path prefix for binaries.
103 (if (or running-emacs-18 running-xemacs)
104 (expand-file-name "../../.." exec-directory)
105 (expand-file-name "../../../.." exec-directory)
108 ;; Please specify emu prefix [optional]
110 (if (string-match "XEmacs" emacs-version)
114 ;; Please specify tl prefix [optional]
115 ;;(setq TL_PREFIX "tl")
117 (if (string-match "XEmacs" emacs-version)
121 ;; Please specify prefix for ``bitmap-mule'' [optional]
122 (setq BITMAP_PREFIX "bitmap")
124 ;; Please specify MU prefix [optional]
125 (setq MU_PREFIX "mu")
127 ;; Please specify MEL prefix [optional]
128 (setq MEL_PREFIX "mel")
130 ;; Please specify SEMI prefix [optional]
131 (setq SEMI_PREFIX "semi")
133 ;; lisp files of SEMI are installed into following directory tree:
135 ;; <LISPDIR> = <PREFIX>/DATA_PREFIX/<install-elisp-prefix>/
136 ;; <LISPDIR>/mime-setup.{el|elc}
137 ;; <LISPDIR>/<TL_PREFIX>/ --- tl lisp files
138 ;; <LISPDIR>/<BITMAP_PREFIX>/ --- bitmap lisp files
139 ;; <LISPDIR>/<MU_PREFIX>/ --- MU lisp files
140 ;; <LISPDIR>/<MEL_PREFIX>/ --- MEL lisp files
141 ;; <LISPDIR>/<SEMI_PREFIX>/ --- SEMI lisp files
143 ;; For example, if <PREFIX> = "/usr/local" and you use Emacs 19.34,
145 ;; <LISPDIR> = /usr/local/share/emacs/site-lisp/
146 ;; /usr/local/share/emacs/site-lisp/mime-setup.{el|elc}
147 ;; /usr/local/share/emacs/site-lisp/ --- tl lisp files
148 ;; /usr/local/share/emacs/site-lisp/mu/ --- MU lisp files
149 ;; /usr/local/share/emacs/site-lisp/mel/ --- MEL lisp files
150 ;; /usr/local/share/emacs/site-lisp/semi/ --- SEMI lisp files
152 ;; For example, if <PREFIX> = "~/" and you use XEmacs,
154 ;; <LISPDIR> = ~/share/xemacs/site-lisp/
155 ;; ~/lib/xemacs/site-lisp/mime-setup.{el|elc}
156 ;; ~/lib/xemacs/site-lisp/tl/ --- tl lisp files
157 ;; ~/lib/xemacs/site-lisp/mu/ --- MU lisp files
158 ;; ~/lib/xemacs/site-lisp/mel/ --- MEL lisp files
159 ;; ~/lib/xemacs/site-lisp/semi/ --- SEMI lisp files
165 ;; Please specify binary path.
166 (defvar BIN_DIR (expand-file-name "bin" EXEC_PREFIX))
168 ;; Please specify binary path. (for external method scripts)
169 (setq METHOD_DIR (expand-file-name "share/tm" PREFIX))
174 ;;; @ optional settings
177 ;; It is generated by automatically. Please set variable `PREFIX'.
178 ;; If you don't like default directory tree, please set it.
179 (defvar LISPDIR (install-detect-elisp-directory PREFIX))
180 ;; (setq install-default-elisp-directory "~/lib/emacs/lisp")
185 (install-detect-elisp-directory PREFIX nil 'version-specific)))
187 ;; Please specify mime-setup.{el|elc} install path.
188 (setq SETUP_FILE_DIR LISPDIR)
190 (setq TL_DIR (expand-file-name TL_PREFIX LISPDIR))
191 (setq BITMAP_DIR (expand-file-name BITMAP_PREFIX LISPDIR))
192 (setq MU_DIR (expand-file-name MU_PREFIX LISPDIR))
193 (setq MEL_DIR (expand-file-name MEL_PREFIX LISPDIR))
194 (setq SEMI_KERNEL_DIR (expand-file-name SEMI_PREFIX LISPDIR))
195 (setq EMH_DIR SEMI_KERNEL_DIR)
196 (setq Gnus_MIME_DIR SEMI_KERNEL_DIR)
197 (setq RMAIL_MIME_DIR SEMI_KERNEL_DIR)
198 (setq SEMI_VM_DIR SEMI_KERNEL_DIR)
200 (cond ((member LISPDIR default-load-path)
201 (setq TL_RELATIVE_DIR TL_PREFIX)
202 (setq BITMAP_RELATIVE_DIR BITMAP_PREFIX)
203 (setq MU_RELATIVE_DIR MU_PREFIX)
204 (setq MEL_RELATIVE_DIR MEL_PREFIX)
205 (setq SEMI_KERNEL_RELATIVE_DIR SEMI_PREFIX)
207 ((string-match (concat "^" (regexp-quote (expand-file-name "~/")))
209 (setq TL_RELATIVE_DIR
210 (concat "~/" (file-relative-name TL_DIR "~/"))
212 (setq BITMAP_RELATIVE_DIR
213 (concat "~/" (file-relative-name BITMAP_DIR "~/"))
215 (setq MU_RELATIVE_DIR
216 (concat "~/" (file-relative-name MU_DIR "~/"))
218 (setq MEL_RELATIVE_DIR
219 (concat "~/" (file-relative-name MEL_DIR "~/"))
221 (setq SEMI_KERNEL_RELATIVE_DIR
222 (concat "~/" (file-relative-name SEMI_KERNEL_DIR "~/"))
226 (setq TL_RELATIVE_DIR TL_DIR)
227 (setq BITMAP_RELATIVE_DIR BITMAP_DIR)
228 (setq MU_RELATIVE_DIR MU_DIR)
229 (setq MEL_RELATIVE_DIR MEL_DIR)
230 (setq SEMI_KERNEL_RELATIVE_DIR SEMI_KERNEL_DIR)
232 (setq EMH_RELATIVE_DIR SEMI_KERNEL_RELATIVE_DIR)
233 (setq Gnus_MIME_RELATIVE_DIR SEMI_KERNEL_RELATIVE_DIR)
235 (setq BIN_SRC_DIR "src")
236 (setq BINS '("ol2" "decode-b"))
237 (setq METHOD_SRC_DIR "methods")
239 '("tm-au" "tm-file" "tm-html" "tm-image" "tm-mpeg"
243 ;;; SEMI-CFG ends here