File: MU-CFG

package info (click to toggle)
mu-cite 8.1%2B0.20120227-4
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 188 kB
  • ctags: 69
  • sloc: lisp: 766; sh: 162; makefile: 87
file content (83 lines) | stat: -rw-r--r-- 2,359 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
;;; -*-Emacs-Lisp-*-

;; MU-CFG: installation setting about mu-cite.

;;; Code:

(defvar default-load-path load-path)

(condition-case nil
    (require 'poe);; Attempt to pickup the function `add-to-list'.
  (error
   (if (fboundp 'add-to-list)
       nil
     ;; This function is limited to only manage the value of
     ;; `load-path'.  It will be overridden by the proper one later.
     (defun add-to-list (list-var element)
       (let ((paths (mapcar 'intern (delq nil (symbol-value list-var))))
	     (elem (if (string-match "/$" element)
		       (substring element 0 (1- (length element)))
		     element)))
	 (or (memq (intern elem) paths)
	     (memq (intern (concat elem "/")) paths)
	     (set list-var (cons element (symbol-value list-var))))))
     (put 'add-to-list 'defun-maybe t))))

;;; @ Please correct the directories where APEL or FLIM modules are
;;;   installed.

(add-to-list 'load-path
	     (expand-file-name "../../site-lisp/apel" data-directory))

(add-to-list 'load-path
	     (expand-file-name "../../site-lisp/flim" data-directory))

(if (boundp 'LISPDIR)
    (progn
      (add-to-list 'default-load-path LISPDIR)
      (add-to-list 'load-path LISPDIR)
      (add-to-list 'load-path (expand-file-name "emu" LISPDIR))
      (add-to-list 'load-path (expand-file-name "apel" LISPDIR))
      (add-to-list 'load-path (expand-file-name "flim" LISPDIR))
      ))

(if (boundp 'VERSION_SPECIFIC_LISPDIR)
    (add-to-list 'load-path VERSION_SPECIFIC_LISPDIR))

(require 'install)

(add-latest-path "custom")

(add-path default-directory)


;;; @ 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 prefix for ``mu'' [optional]
(setq MU_PREFIX "mu")



;;; @ 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")

(defvar VERSION_SPECIFIC_LISPDIR
  (install-detect-elisp-directory PREFIX nil 'version-specific))

(setq MU_DIR (expand-file-name MU_PREFIX LISPDIR))

(defvar PACKAGEDIR
  (install-get-default-package-directory))

;;; MU-CFG ends here