TM-CFG

   1 ;;; -*-Emacs-Lisp-*-
   2 ;;;
   3 ;;; $Id: TM-CFG,v 7.1 1996/05/27 15:09:09 morioka Exp morioka $
   4 ;;;
   5
   6 (defvar default-load-path load-path)
   7 (setq load-path (append
   8                  (mapcar (function
   9                           (lambda (path)
  10                             (expand-file-name path (getenv "PWD"))
  11                             ))
  12                          '("." "../tl" "../mel" "mh-e")
  13                          )
  14                  load-path))
  15
  16 (require 'tl-misc)
  17
  18
  19 ;;; @ Please specify optional package directory if you use them.
  20 ;;;
  21
  22 ;; Please specify VM path.
  23 (add-path "vm-5.95beta" 'all-paths)
  24
  25 ;; Please specify Mailcrypt path.
  26 (add-path "mailcrypt-3.4" 'all-paths)
  27
  28 ;; Please specify BBDB path.
  29 (add-path "bbdb-1.50" 'all-paths)
  30
  31
  32 ;;; @ shell
  33 ;;;
  34
  35 ;; Please specify shell command path.
  36 (setq SHELL "/bin/sh")
  37
  38 ;; Please specify shell command option.
  39 (setq SHELLOPTION "-c")
  40
  41
  42 ;;; @ Please specify prefix of install directory.
  43 ;;;
  44
  45 ;; Please specify install path prefix.
  46 (setq PREFIX
  47       (if (or running-emacs-18 running-xemacs)
  48           (expand-file-name "../../.." exec-directory)
  49         (expand-file-name "../../../.." data-directory)
  50         )) ; install to shared directory (maybe "/usr/local")
  51 ;;(setq PREFIX "~/")    ; install to your home directory
  52
  53 ;; Please specify install path prefix for binaries.
  54 (setq EXEC_PREFIX
  55       (if (or running-emacs-18 running-xemacs)
  56           (expand-file-name "../../.." exec-directory)
  57         (expand-file-name "../../../.." exec-directory)
  58         ))
  59 ;;(setq EXEC_PREFIX "~/")       ; install to your home directory
  60
  61 ;; Please specify tm package prefix [optional]
  62 (setq TM_PACKAGE_PREFIX "")
  63
  64 ;; Please specify tl prefix [optional]
  65 ;;(setq TL_PREFIX "tl")
  66 (setq TL_PREFIX
  67       (if (string-match "XEmacs" emacs-version)
  68           "tl"
  69         ""))
  70
  71 ;; Please specify MEL prefix [optional]
  72 (setq MEL_PREFIX "mel")
  73
  74 ;; Please specify tm prefix [optional]
  75 (setq TM_PREFIX "tm")
  76
  77 ;; lisp files of tm are installed into following directory tree:
  78 ;;
  79 ;;      LISPDIR = PREFIX/DATA_PREFIX/LISP_PREFIX/
  80 ;;      LISPDIR/mime-setup.{el|elc}
  81 ;;      LISPDIR/TM_PACKAGE_PREFIX/TL_PREFIX/  --- tl  lisp files
  82 ;;      LISPDIR/TM_PACKAGE_PREFIX/MEL_PREFIX/ --- MEL lisp files
  83 ;;      LISPDIR/TM_PACKAGE_PREFIX/TM_PREFIX/  --- tm  lisp files
  84 ;;
  85 ;; For example, if PREFIX = "/usr/local/" and you use Emacs 19.30,
  86 ;;
  87 ;;      LISPDIR = /usr/local/share/emacs/site-lisp/
  88 ;;      /usr/local/share/emacs/site-lisp/mime-setup.{el|elc}
  89 ;;      /usr/local/share/emacs/site-lisp/     --- tl  lisp files
  90 ;;      /usr/local/share/emacs/site-lisp/mel/ --- MEL lisp files
  91 ;;      /usr/local/share/emacs/site-lisp/tm/  --- tm  lisp files
  92 ;;
  93 ;; For example, if PREFIX = "~/" and you use XEmacs,
  94 ;;
  95 ;;      LISPDIR = ~/share/xemacs/site-lisp/
  96 ;;      ~/share/xemacs/site-lisp/mime-setup.{el|elc}
  97 ;;      ~/share/xemacs/site-lisp/tl/  --- tl  lisp files
  98 ;;      ~/share/xemacs/site-lisp/mel/ --- MEL lisp files
  99 ;;      ~/share/xemacs/site-lisp/tm/  --- tm  lisp files
 100
 101
 102 ;;; @ executables
 103 ;;;
 104
 105 ;; Please specify binary path.
 106 (defvar BIN_DIR (expand-file-name "bin" EXEC_PREFIX))
 107
 108 ;; Please specify binary path. (for external method scripts)
 109 (setq METHOD_DIR (expand-file-name "share/tm" PREFIX))
 110
 111
 112 \f
 113
 114 ;;; @ optional settings
 115 ;;;
 116
 117 (setq LISP_PREFIX
 118       (if (>= emacs-major-version 19)
 119           "site-lisp"
 120         "local.lisp"))
 121
 122 (setq PATTERN-TO-INSTALL
 123       (expand-file-name (concat ".*/" LISP_PREFIX) PREFIX))
 124 (setq PATTERN-TO-AVOID
 125       (format "%d\\.%s" emacs-major-version emacs-minor-version))
 126
 127 (defvar LISPDIR
 128   (or
 129    (catch 'tag
 130      (let ((rest default-load-path)
 131            dir)
 132        (while (setq dir (car rest))
 133          (or (string-match PATTERN-TO-AVOID dir)
 134              (if (string-match PATTERN-TO-INSTALL dir)
 135                  (throw 'tag (substring dir 0 (match-end 0)))
 136                ))
 137          (setq rest (cdr rest))
 138          )))
 139    (expand-file-name (concat
 140                       (if running-emacs-19
 141                           "share/"
 142                         "lib/")
 143                       (cond ((boundp 'NEMACS) "nemacs/")
 144                             ((boundp 'MULE)   "mule/")
 145                             (running-xemacs
 146                              (if (featurep 'mule)
 147                                  "xmule/"
 148                                "xemacs/"))
 149                             (t "emacs/"))
 150                       LISP_PREFIX) PREFIX)
 151    ))
 152
 153 ;; Please specify mime-setup.{el|elc} install path.
 154 (setq SETUP_FILE_DIR LISPDIR)
 155
 156 (setq TM_LISPDIR (expand-file-name TM_PACKAGE_PREFIX LISPDIR))
 157
 158 (setq TL_DIR (expand-file-name TL_PREFIX TM_LISPDIR))
 159 (setq MEL_DIR (expand-file-name MEL_PREFIX TM_LISPDIR))
 160 (setq TM_KERNEL_DIR (expand-file-name TM_PREFIX TM_LISPDIR))
 161 (setq TM_MHE_DIR TM_KERNEL_DIR)
 162 (setq TM_GNUS_DIR TM_KERNEL_DIR)
 163
 164 (setq TM_GNUS_INSTALL_FORMAT
 165       "cd gnus; PWD=`pwd` make install-19 EMACS=%s TMDIR19=%s")
 166 (setq TM_GNUS_COMPILE ".gnus-compile")
 167 (setq MAKE "make")
 168
 169 (setq el-file-mode (+ (* 64 6)(* 8 4) 4))
 170
 171
 172 (setq BIN_SRC_DIR "src")
 173 (setq BINS '("ol2" "decode-b"))
 174 (setq METHOD_SRC_DIR "methods")
 175 (setq METHODS
 176       '("tm-au" "tm-file" "tm-html" "tm-image" "tm-mpeg" "tm-plain"
 177         "tmdecode"))