From 8267211abfd237ce97a1c58dc96c64bca30e02a0 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 13 Apr 1998 14:54:21 +0000 Subject: [PATCH] Modify for FLIM. --- EMH-CFG | 30 +++++++++++++++++------------- 1 file changed, 17 insertions(+), 13 deletions(-) diff --git a/EMH-CFG b/EMH-CFG index 4df3e2c..715ea1c 100644 --- a/EMH-CFG +++ b/EMH-CFG @@ -1,25 +1,29 @@ ;;; -*-Emacs-Lisp-*- ;;; -;;; $Id: EMH-CFG,v 0.3 1997-11-15 15:22:38 morioka Exp $ +;;; $Id: EMH-CFG,v 0.4 1998-04-13 14:54:21 morioka Exp $ ;;; (defvar default-load-path load-path) -(cond ((boundp 'LISPDIR) - (add-to-list 'default-load-path LISPDIR) - (add-to-list 'load-path LISPDIR) - (add-to-list 'load-path (expand-file-name "apel" LISPDIR)) - ) - (t - (add-to-list 'load-path - (expand-file-name "../../site-lisp/apel" data-directory)) - )) +(add-to-list 'load-path + (expand-file-name "../../site-lisp/apel" data-directory)) +(add-to-list 'load-path + (expand-file-name "." data-directory)) -(require 'install) +(when (boundp 'LISPDIR) + (add-to-list 'default-load-path LISPDIR) + (add-to-list 'load-path LISPDIR) + (add-to-list 'load-path (expand-file-name "apel" LISPDIR)) + ) -(add-path "mel") +(condition-case nil + (require 'install) + (error (error "Please install APEL 8.2 or later."))) + +(add-path "flim") (add-path "semi") -(add-path ".") + +(add-to-list 'load-path (expand-file-name ".")) ;;; @ Please specify prefix of install directory. -- 1.7.10.4