From: morioka Date: Wed, 12 Mar 1997 07:49:41 +0000 (+0000) Subject: Delete variables about other modules. X-Git-Tag: Hokutetsu-Ishikawa-new~159 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8b593c061525d3bdbbf08e9d369b567fb7f08ed6;p=elisp%2Fsemi.git Delete variables about other modules. --- diff --git a/SEMI-CFG b/SEMI-CFG index df3b2f4..1209df2 100644 --- a/SEMI-CFG +++ b/SEMI-CFG @@ -1,6 +1,6 @@ ;;; -*-Emacs-Lisp-*- ;;; -;;; $Id: SEMI-CFG,v 0.4 1997-03-03 17:52:59 morioka Exp $ +;;; $Id: SEMI-CFG,v 0.5 1997-03-12 07:49:41 morioka Exp $ ;;; (defvar default-load-path load-path) @@ -10,8 +10,7 @@ (expand-file-name path default-directory) )) '("." "../emu" "../apel" "../bitmap-mule" - "../mu" "../mel" - "../emh" "../gnus-mime" "../rmail-mime") + "../mu" "../mel") ) load-path)) @@ -98,18 +97,6 @@ "emu" "")) -;; Please specify APEL prefix [optional] -(setq APEL_PREFIX "apel") - -;; Please specify prefix for ``bitmap-mule'' [optional] -(setq BITMAP_PREFIX "bitmap") - -;; Please specify MU prefix [optional] -(setq MU_PREFIX "mu") - -;; Please specify MEL prefix [optional] -(setq MEL_PREFIX "mel") - ;; Please specify SEMI prefix [optional] (setq SEMI_PREFIX "semi") @@ -134,56 +121,8 @@ (defvar LISPDIR (install-detect-elisp-directory PREFIX)) ;; (setq install-default-elisp-directory "~/lib/emacs/lisp") -(setq EMU_DIR - (expand-file-name - EMU_PREFIX - (install-detect-elisp-directory PREFIX nil 'version-specific))) - -(setq APEL_DIR (expand-file-name APEL_PREFIX LISPDIR)) -(setq BITMAP_DIR (expand-file-name BITMAP_PREFIX LISPDIR)) -(setq MU_DIR (expand-file-name MU_PREFIX LISPDIR)) -(setq MEL_DIR (expand-file-name MEL_PREFIX LISPDIR)) (setq SEMI_KERNEL_DIR (expand-file-name SEMI_PREFIX LISPDIR)) (setq SETUP_FILE_DIR SEMI_KERNEL_DIR) -(setq EMH_DIR SEMI_KERNEL_DIR) -(setq Gnus_MIME_DIR SEMI_KERNEL_DIR) -(setq RMAIL_MIME_DIR SEMI_KERNEL_DIR) -(setq SEMI_VM_DIR SEMI_KERNEL_DIR) - -(cond ((member LISPDIR default-load-path) - (setq APEL_RELATIVE_DIR APEL_PREFIX) - (setq BITMAP_RELATIVE_DIR BITMAP_PREFIX) - (setq MU_RELATIVE_DIR MU_PREFIX) - (setq MEL_RELATIVE_DIR MEL_PREFIX) - (setq SEMI_KERNEL_RELATIVE_DIR SEMI_PREFIX) - ) - ((string-match (concat "^" (regexp-quote (expand-file-name "~/"))) - LISPDIR) - (setq APEL_RELATIVE_DIR - (concat "~/" (file-relative-name APEL_DIR "~/")) - ) - (setq BITMAP_RELATIVE_DIR - (concat "~/" (file-relative-name BITMAP_DIR "~/")) - ) - (setq MU_RELATIVE_DIR - (concat "~/" (file-relative-name MU_DIR "~/")) - ) - (setq MEL_RELATIVE_DIR - (concat "~/" (file-relative-name MEL_DIR "~/")) - ) - (setq SEMI_KERNEL_RELATIVE_DIR - (concat "~/" (file-relative-name SEMI_KERNEL_DIR "~/")) - ) - ) - (t - (setq APEL_RELATIVE_DIR APEL_DIR) - (setq BITMAP_RELATIVE_DIR BITMAP_DIR) - (setq MU_RELATIVE_DIR MU_DIR) - (setq MEL_RELATIVE_DIR MEL_DIR) - (setq SEMI_KERNEL_RELATIVE_DIR SEMI_KERNEL_DIR) - )) -(setq EMH_RELATIVE_DIR SEMI_KERNEL_RELATIVE_DIR) -(setq Gnus_MIME_RELATIVE_DIR SEMI_KERNEL_RELATIVE_DIR) (setq METHOD_SRC_DIR "methods") (setq METHODS