From: morioka <morioka>
Date: Thu, 28 Nov 1996 13:35:39 +0000 (+0000)
Subject: Initial revision
X-Git-Tag: tm-7_93~5
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=54d0ee10e9c5b901dbc1e9038fb277d1433a2414;p=elisp%2Fsinfo.git

Initial revision
---

54d0ee10e9c5b901dbc1e9038fb277d1433a2414
diff --git a/SINFO-CFG b/SINFO-CFG
new file mode 100644
index 0000000..c74bb1f
--- /dev/null
+++ b/SINFO-CFG
@@ -0,0 +1,68 @@
+;;; -*-Emacs-Lisp-*-
+;;;
+;;; $Id: SINFO-CFG,v 1.1 1996-11-28 13:35:05 morioka Exp $
+;;;
+
+(defvar default-load-path load-path)
+(setq load-path (nconc
+		 (mapcar (function
+			  (lambda (path)
+			    (expand-file-name path (getenv "PWD"))
+			    ))
+			 '("." "../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
diff --git a/SINFO-ELS b/SINFO-ELS
new file mode 100644
index 0000000..c48a3a7
--- /dev/null
+++ b/SINFO-ELS
@@ -0,0 +1,11 @@
+;;; -*-Emacs-Lisp-*-
+;;;
+;;; $Id: SINFO-ELS,v 1.1 1996-11-28 13:35:16 morioka Exp $
+;;;
+
+(setq sinfo-modules
+      (cond (running-mule-merged-emacs
+	     '(sinfo)
+	     )))
+
+;;; SINFO-ELS ends here
diff --git a/SINFO-MK b/SINFO-MK
new file mode 100644
index 0000000..125dd0a
--- /dev/null
+++ b/SINFO-MK
@@ -0,0 +1,41 @@
+;;; -*-Emacs-Lisp-*-
+;;;
+;;; $Id: SINFO-MK,v 1.1 1996-11-28 13:35:39 morioka Exp $
+;;;
+
+(defun config-sinfo ()
+  (let (prefix exec-prefix)
+    (setq prefix (car command-line-args-left))
+    (and prefix
+	 (not (string-equal "NONE" prefix))
+	 (progn
+	   (defvar PREFIX prefix)
+	   (setq command-line-args-left (cdr command-line-args-left))
+	   )
+	))
+  (load-file "SINFO-CFG")
+  (load-file "../emu/EMU-ELS")
+  (load-file "../tl/TL-ELS")
+  (load-file "SINFO-ELS")
+  (princ (format "PREFIX=%s\n" PREFIX))
+  )
+
+(defun compile-sinfo ()
+  (config-sinfo)
+  (print load-path)
+  (compile-elisp-modules emu-modules	"../emu")
+  (compile-elisp-modules tl-modules	"../tl")
+  (compile-elisp-modules sinfo-modules	".")
+  )
+
+(defun install-sinfo ()
+  (config-sinfo)
+  (princ (format "%s\n" emacs-version))
+  (install-elisp-modules emu-modules	"../emu"	EMU_DIR)
+  (install-elisp-modules tl-modules	"../tl"		TL_DIR)
+  (install-elisp-modules sinfo-modules	"."		SINFO_DIR)
+  (install-files '("sinfo.dtd")	"."	DTD_DIR		nil 'overwrite)
+  (install-files '("texi-mapping") "."	TEXI_REP_DIR	nil 'overwrite)
+  )
+
+;;; MK-SINFO ends here