tm-cfg

   1 ;;; -*-Emacs-Lisp-*-
   2 ;;;
   3 ;;; $Id: tm-cfg,v 1.1 1996/03/04 08:37:01 morioka Exp morioka $
   4 ;;;
   5
   6 (setq load-path (append
   7                  (mapcar (function
   8                           (lambda (path)
   9                             (expand-file-name path (getenv "PWD"))
  10                             ))
  11                          '("." "../tl/" "../mel/" "mh-e/")
  12                          )
  13                  load-path))
  14
  15 (require 'tl-misc)
  16
  17
  18 ;; Please specify VM path.
  19 (add-path "vm-5.95beta/" 'all-paths)
  20
  21 ;; Please specify Mailcrypt path.
  22 (add-path "mailcrypt-3.4/" 'all-paths)
  23
  24 ;; Please specify BBDB path.
  25 (add-path "bbdb-1.50/" 'all-paths)
  26
  27 ;; Please specify shell command path.
  28 (setq SHELL "/bin/sh")
  29
  30 ;; Please specify install path prefix.
  31 (setq PREFIX "~/")
  32 ;;(setq PREFIX "/usr/local/")
  33
  34 (setq EMACS_PREFIX
  35       (cond ((boundp 'NEMACS) "nemacs/")
  36             ((boundp 'MULE)   "mule/")
  37             ((string-match "XEmacs" emacs-version) "xemacs/")
  38             (t "emacs/")
  39             ))
  40
  41 (setq DATA_PREFIX
  42       (if (or (< emacs-major-version 19)
  43               (< emacs-minor-version 29)
  44               )
  45           "lib/"
  46         "share/"))
  47
  48 (setq DATADIR (expand-file-name DATA_PREFIX PREFIX))
  49
  50 (setq LISP_PREFIX
  51       (if (>= emacs-major-version 19)
  52           "site-lisp/"
  53         "local.lisp/"))
  54
  55 (setq EMACS_DATADIR (expand-file-name EMACS_PREFIX DATADIR))
  56
  57 (setq LISPDIR (expand-file-name LISP_PREFIX EMACS_DATADIR))
  58
  59
  60 ;; Please specify mime-setup.{el|elc} install path.
  61 (setq SETUP_FILE_DIR LISPDIR)
  62
  63
  64 (setq TM_PREFIX "")
  65
  66 (setq TM_LISPDIR (expand-file-name TM_PREFIX LISPDIR))
  67
  68 (setq TL_DIR (expand-file-name "tl/" TM_LISPDIR))
  69 (setq MEL_DIR (expand-file-name "mel/" TM_LISPDIR))
  70 (setq TM_KERNEL_DIR (expand-file-name "tm/" TM_LISPDIR))
  71 (setq TM_MHE_DIR TM_KERNEL_DIR)
  72 (setq TM_GNUS_DIR TM_KERNEL_DIR)
  73
  74
  75 (setq el-file-mode (+ (* 64 6)(* 8 4) 4))
  76
  77
  78 (setq BINS '("src/ol2" "src/decode-b"))
  79 (setq METHODS
  80       '("tm-au" "tm-file" "tm-html" "tm-image" "tm-mpeg" "tm-plain"
  81         "tmdecode"))
  82
  83
  84 ;; Please specify binary path.
  85 (setq BIN_DIR (expand-file-name "bin/" PREFIX))
  86
  87 ;; Please specify binary path.
  88 (setq METHOD_DIR BIN_DIR)