;;; -*-Emacs-Lisp-*-
;;;
;;; $Id: TM-CFG,v 2.0 1996/03/11 14:54:25 morioka Exp $
;;;

(setq load-path (append
		 (mapcar (function
			  (lambda (path)
			    (expand-file-name path (getenv "PWD"))
			    ))
			 '("." "../tl/" "../mel/" "mh-e/")
			 )
		 load-path))

(require 'tl-misc)


;; Please specify VM path.
(add-path "vm-5.95beta/" 'all-paths)

;; Please specify Mailcrypt path.
(add-path "mailcrypt-3.4/" 'all-paths)

;; Please specify BBDB path.
(add-path "bbdb-1.50/" 'all-paths)

;; Please specify shell command path.
(setq SHELL "/bin/sh")

;; Please specify shell command option.
(setq SHELLOPTION "-c")

;; Please specify install path prefix.
(setq PREFIX "~/")
;;(setq PREFIX "/usr/local/")

(setq EMACS_PREFIX
      (cond ((boundp 'NEMACS) "nemacs/")
	    ((boundp 'MULE)   "mule/")
	    ((string-match "XEmacs" emacs-version) "xemacs/")
	    (t "emacs/")
	    ))

(setq DATA_PREFIX
      (if (or (< emacs-major-version 19)
	      (< emacs-minor-version 29)
	      )
	  "lib/"
	"share/"))

(setq DATADIR (expand-file-name DATA_PREFIX PREFIX))

(setq LISP_PREFIX
      (if (>= emacs-major-version 19)
	  "site-lisp/"
	"local.lisp/"))

(setq EMACS_DATADIR (expand-file-name EMACS_PREFIX DATADIR))

(defvar LISPDIR (expand-file-name LISP_PREFIX EMACS_DATADIR))


;; Please specify mime-setup.{el|elc} install path.
(setq SETUP_FILE_DIR LISPDIR)


(setq TM_PREFIX "")

(setq TM_LISPDIR (expand-file-name TM_PREFIX LISPDIR))

(setq TL_DIR (expand-file-name "tl/" TM_LISPDIR))
(setq MEL_DIR (expand-file-name "mel/" TM_LISPDIR))
(setq TM_KERNEL_DIR (expand-file-name "tm/" TM_LISPDIR))
(setq TM_MHE_DIR TM_KERNEL_DIR)
(setq TM_GNUS_DIR TM_KERNEL_DIR)

(setq TM_GNUS_COMPILE_FORMAT "cd gnus; PWD=`pwd` make %s EMACS=%s")
(setq TM_GNUS_INSTALL_FORMAT "cd gnus; PWD=`pwd` make install-19 EMACS=%s TMDIR19=%s")

(setq el-file-mode (+ (* 64 6)(* 8 4) 4))


(setq BIN_SRC_DIR "src/")
(setq BINS '("src/ol2" "src/decode-b"))
(setq METHOD_SRC_DIR "methods/")
(setq METHODS
      '("tm-au" "tm-file" "tm-html" "tm-image" "tm-mpeg" "tm-plain"
	"tmdecode"))


;; Please specify binary path.
(defvar BIN_DIR (expand-file-name "bin/" PREFIX))

;; Please specify binary path.
(setq METHOD_DIR BIN_DIR)