EMH-CFG

   1 ;;; -*-Emacs-Lisp-*-
   2 ;;;
   3 ;;; $Id: EMH-CFG,v 0.1 1997-05-15 06:45:43 morioka Exp $
   4 ;;;
   5
   6 (defvar default-load-path load-path)
   7
   8 ;; (setq load-path (nconc
   9 ;;                  (mapcar (function
  10 ;;                           (lambda (path)
  11 ;;                             (expand-file-name path default-directory)
  12 ;;                             ))
  13 ;;                          '("." "../semi"
  14 ;;                            "../emu" "../apel" "../mu" "../mel")
  15 ;;                          )
  16 ;;                  load-path))
  17
  18 (add-to-list 'load-path
  19              (expand-file-name "../../site-lisp/apel" data-directory))
  20
  21 (when (boundp 'LISPDIR)
  22   (add-to-list 'default-load-path LISPDIR)
  23   (add-to-list 'load-path LISPDIR)
  24   (add-to-list 'load-path (expand-file-name "apel" LISPDIR))
  25   )
  26
  27 (require 'install)
  28
  29 (add-path "semi")
  30
  31
  32 ;;; @ Please specify prefix of install directory.
  33 ;;;
  34
  35 ;; Please specify install path prefix.
  36 ;; If it is omitted, shared directory (maybe /usr/local is used).
  37 (defvar PREFIX install-prefix)
  38 ;;(setq PREFIX "~/")
  39
  40 ;; Please specify prefix for ``emh'' [optional]
  41 (setq EMH_PREFIX "semi")
  42
  43 \f
  44
  45 ;;; @ optional settings
  46 ;;;
  47
  48 ;; It is generated by automatically. Please set variable `PREFIX'.
  49 ;; If you don't like default directory tree, please set it.
  50 (defvar LISPDIR (install-detect-elisp-directory PREFIX))
  51 ;; (setq install-default-elisp-directory "~/lib/emacs/lisp")
  52
  53 (setq EMH_DIR (expand-file-name EMH_PREFIX LISPDIR))
  54
  55 ;;; EMH-CFG ends here