;;; -*-Emacs-Lisp-*- ;;; ;;; $Id: SINFO-CFG,v 1.2 1997-01-01 06:53:26 morioka Exp $ ;;; (defvar default-load-path load-path) (setq load-path (nconc (mapcar (function (lambda (path) (expand-file-name path default-directory) )) '("." "../emu" "../tl" "../sinfo") ) load-path)) (require 'tl-misc) (require 'install) ;;; @ shell ;;; ;; Please specify shell command path. (setq SHELL (find-if (function file-exists-p) '("/bin/sh" "/usr/bin/sh") )) ;; Please specify shell command option. (setq SHELLOPTION "-c") ;;; @ Please specify prefix of install directory. ;;; ;; Please specify install path prefix. ;; If it is omitted, shared directory (maybe /usr/local is used). (defvar PREFIX install-prefix) ;;(setq PREFIX "~/") ;; Please specify tl prefix [optional] ;;(setq TL_PREFIX "tl") (setq TL_PREFIX (if (string-match "XEmacs" emacs-version) "tl" "")) (setq SINFO_PREFIX "sinfo") ;;; @ optional settings ;;; ;; It is generated by automatically. Please set variable `PREFIX'. ;; If you don't like default directory tree, please set it. (defvar LISPDIR (install-detect-elisp-directory PREFIX)) ;; (setq install-default-elisp-directory "~/lib/emacs/lisp") (setq EMU_DIR (install-detect-elisp-directory PREFIX nil 'version-specific)) (setq TL_DIR (expand-file-name TL_PREFIX LISPDIR)) (setq SINFO_DIR (expand-file-name SINFO_PREFIX LISPDIR)) (setq DTD_DIR (expand-file-name "share/sgml/dtd" PREFIX)) (setq TEXI_REP_DIR (expand-file-name "share/sgml/rep/sinfo" PREFIX)) ;;; SINFO-CFG ends here