CANNA-CFG

   1 ;;; -*-Emacs-Lisp-*-
   2 ;;;
   3 ;;; $Id: CANNA-CFG,v 1.1 1998-01-16 08:51:11 morioka Exp $
   4 ;;;
   5
   6 (defvar default-load-path load-path)
   7
   8 ;; (setq load-path (append
   9 ;;                  (mapcar (function
  10 ;;                           (lambda (path)
  11 ;;                             (expand-file-name path (getenv "PWD"))
  12 ;;                             ))
  13 ;;                          '("." "../apel" "../emu" "../tl")
  14 ;;                          )
  15 ;;                  load-path))
  16
  17 (add-to-list 'load-path
  18              (expand-file-name "../../site-lisp/apel" data-directory))
  19
  20 (if (boundp 'LISPDIR)
  21     (progn
  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 default-directory)
  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 ``CANNA'' [optional]
  41 (setq CANNA_PREFIX "")
  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 CANNA_DIR (expand-file-name CANNA_PREFIX LISPDIR))
  54
  55 ;;; CANNA-CFG ends here