This commit was manufactured by cvs2svn to create branch 'tomo'.
authortomo <tomo>
Fri, 9 May 1997 02:48:23 +0000 (02:48 +0000)
committertomo <tomo>
Fri, 9 May 1997 02:48:23 +0000 (02:48 +0000)
APEL-CFG [deleted file]
APEL-ELS [deleted file]
APEL-MK [deleted file]
EMU-CFG [deleted file]
EMU-ELS [deleted file]
EMU-MK [deleted file]
README.en [deleted file]

diff --git a/APEL-CFG b/APEL-CFG
deleted file mode 100644 (file)
index d72b478..0000000
--- a/APEL-CFG
+++ /dev/null
@@ -1,29 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: APEL-CFG,v 0.1 1997-03-20 02:03:32 morioka Exp $
-;;;
-
-;;; @ 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 ``apel'' [optional]
-(setq APEL_PREFIX "apel")
-
-\f
-
-;;; @ 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 APEL_DIR (expand-file-name APEL_PREFIX LISPDIR))
-
-;;; APEL-CFG ends here
diff --git a/APEL-ELS b/APEL-ELS
deleted file mode 100644 (file)
index bb34bd6..0000000
--- a/APEL-ELS
+++ /dev/null
@@ -1,10 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: APEL-ELS,v 1.5 1997-05-09 01:23:44 morioka Exp $
-;;;
-
-(setq apel-modules '(alist atype file-detect filename install
-                          std11 std11-parse
-                          mule-caesar))
-
-;;; APEL-ELS ends here
diff --git a/APEL-MK b/APEL-MK
deleted file mode 100644 (file)
index 61902fe..0000000
--- a/APEL-MK
+++ /dev/null
@@ -1,37 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: APEL-MK,v 0.2 1997-03-20 02:12:39 morioka Exp $
-;;;
-
-(defun config-apel ()
-  (let (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 "APEL-CFG")
-    (or (boundp 'apel-modules)
-       (load-file "APEL-ELS")
-       )
-    (princ (format "PREFIX=%s\n" PREFIX))
-    ))
-
-(defun compile-apel ()
-  (add-to-list 'load-path (expand-file-name "../emu"))
-  (add-to-list 'load-path ".")
-  (require 'install)
-  (load-file "APEL-ELS")
-  (compile-elisp-modules apel-modules  ".")
-  )
-
-(defun install-apel ()
-  (compile-apel)
-  (config-apel)
-  (compile-elisp-modules apel-modules  ".")
-  (install-elisp-modules apel-modules  "."     APEL_DIR)
-  )
-
-;;; APEL-MK ends here
diff --git a/EMU-CFG b/EMU-CFG
deleted file mode 100644 (file)
index 4eeb9b5..0000000
--- a/EMU-CFG
+++ /dev/null
@@ -1,42 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: EMU-CFG,v 0.0 1997-03-14 07:16:00 morioka Exp $
-;;;
-
-(setq load-path (append
-                (mapcar (function
-                         (lambda (path)
-                           (expand-file-name path default-directory)
-                           ))
-                        '("." "../apel" "../tl")
-                        )
-                load-path))
-
-(require 'install)
-
-
-;;; @ 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 emu prefix [optional]
-(setq EMU_PREFIX
-      (if (string-match "XEmacs" emacs-version)
-         "emu"
-       ""))
-
-\f
-
-;;; @ optional settings
-;;;
-
-(setq EMU_DIR
-      (expand-file-name
-       EMU_PREFIX
-       (install-detect-elisp-directory PREFIX nil 'version-specific)))
-
-;;; EMU-CFG ends here
diff --git a/EMU-ELS b/EMU-ELS
deleted file mode 100644 (file)
index 8769fe2..0000000
--- a/EMU-ELS
+++ /dev/null
@@ -1,48 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: EMU-ELS,v 1.2 1997-03-14 07:17:34 morioka Exp $
-;;;
-
-(setq emu-modules
-      (cons
-       'emu
-       (if (or running-emacs-19_29-or-later
-              running-xemacs-19_14-or-later)
-          '(richtext)
-        '(tinyrich)
-        )))
-
-(setq emu-modules
-      (nconc
-       (cond (running-mule-merged-emacs
-             '(emu-e20)
-             )
-            (running-xemacs-with-mule
-             '(emu-x20)
-             )
-            ((boundp 'MULE)
-             '(emu-mule)
-             )
-            ((boundp 'NEMACS)
-             '(emu-nemacs)
-             )
-            (t
-             '(emu-e19)
-             ))
-       emu-modules))
-
-(setq emu-modules
-      (nconc
-       (cond (running-emacs-18
-             '(emu-18 env)
-             )
-            (running-xemacs
-             '(emu-xemacs)
-             )
-            (t
-             '(emu-19)
-             )
-            )
-       emu-modules))
-
-;;; EMU-ELS ends here
diff --git a/EMU-MK b/EMU-MK
deleted file mode 100644 (file)
index 378f30f..0000000
--- a/EMU-MK
+++ /dev/null
@@ -1,30 +0,0 @@
-;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: EMU-MK,v 0.0 1997-03-14 07:17:53 morioka Exp $
-;;;
-
-(defun config-emu ()
-  (let (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 "EMU-CFG")
-    (load-file "EMU-ELS")
-    (princ (format "PREFIX=%s\n" PREFIX))
-    ))
-
-(defun compile-emu ()
-  (config-emu)
-  (compile-elisp-modules emu-modules   ".")
-  )
-
-(defun install-emu ()
-  (config-emu)
-  (install-elisp-modules emu-modules   "./"    EMU_DIR)
-  )
-
-;;; EMU-MK ends here
diff --git a/README.en b/README.en
deleted file mode 100644 (file)
index 1c7bbd7..0000000
--- a/README.en
+++ /dev/null
@@ -1,240 +0,0 @@
-[README for APEL (English Version)]
-by MORIOKA Tomohiko <morioka@jaist.ac.jp>
-$Id: README.en,v 1.1 1997-03-20 06:03:51 morioka Exp $
-
-What's APEL
-===========
-
-  APEL stands for "A Portable Emacs Library".  It consists of
-  following modules:
-
-       emu:    A package to fill incompatibilities of emacsen
-               emu.el --- main module
-           About mule API:
-               emu-nemacs.el --- for NEmacs
-               emu-e19.el    --- for Emacs 19 or XEmacs without mule
-               emu-mule.el   --- for MULE 2.3
-               emu-e20.el    --- for Emacs/mule (Emacs 20, MULE 3)
-               emu-x20.el    --- for XEmacs/mule
-           About other API
-               emu-18.el     --- for Emacs 18
-               emu-19.el     --- for Emacs 19 or later
-               emu-xemacs.el --- for XEmacs
-               env.el        --- env.el for Emacs 18
-               richtext.el   --- text/richtext module
-                                   for Emacs 19.29 or later,
-                                       XEmacs 19.14 or later
-               tinyrich.el   --- text/richtext module for old emacsen
-
-       alist.el: utility for Association-list
-
-       atype.el: utility for atype
-
-       file-detect.el: load-path or file-detection
-
-       filename.el: utility to make file-name
-
-       install.el: utility to install emacs-lisp package
-
-
-Installation
-============
-
-(a) run in expanded place
-
-  If you don't want to install other directories, please do only
-  following:
-
-       % make
-
-  You can specify the emacs command name, for example
-
-       % make install EMACS=xemacs
-
-  If `EMACS=...' is omitted, EMACS=emacs is used.
-
-(b) make install
-
-  If you want to install other directories, please do following:
-
-       % make install
-
-  You can specify the emacs command name, for example
-
-       % make install EMACS=xemacs
-
-  If `EMACS=...' is omitted, EMACS=emacs is used.
-
-  You can specify the prefix of the directory tree for Emacs Lisp
-  programs and shell scripts, for example:
-
-       % make install PREFIX=~/
-
-  If `PREFIX=...' is omitted, the prefix of the directory tree of the
-  specified emacs command is used (perhaps /usr/local).
-
-  For example, if PREFIX=/usr/local and EMACS 19.34 is specified, it
-  will create the following directory tree:
-
-       /usr/local/share/emacs/19.34/site-lisp/  --- emu
-       /usr/local/share/emacs/site-lisp/apel/   --- APEL
-
-  You can specify other optional settings by editing the file
-  APEL-CFG.  Please read comments in it.
-
-
-load-path (for Emacs or MULE)
-=============================
-
-  If you are using Emacs or Mule, please add directory of apel to
-  load-path.  If you install by default setting, you can write
-  subdirs.el for example:
-
-  --------------------------------------------------------------------
-  (normal-top-level-add-to-load-path '("apel"))
-  --------------------------------------------------------------------
-
-  If you are using XEmacs, there are no need of setting about
-  load-path.
-
-
-How to use
-==========
-
-alist
------
-
-Function put-alist (ITEM VALUE ALIST)
-
-  Modify ALIST to set VALUE to ITEM.  If there is a pair whose car is
-  ITEM, replace its cdr by VALUE.  If there is not such pair, create
-  new pair (ITEM . VALUE) and return new alist whose car is the new
-  pair and cdr is ALIST.
-
-Function del-alist (ITEM ALIST)
-
-  If there is a pair whose key is ITEM, delete it from ALIST.
-
-Function set-alist (SYMBOL ITEM VALUE)
-
-  Modify a alist indicated by SYMBOL to set VALUE to ITEM.
-
-  Ex. (set-alist 'auto-mode-alist "\\.pln$" 'text-mode)
-
-Function modify-alist (MODIFIER DEFAULT)
-
-  Modify alist DEFAULT into alist MODIFIER.
-
-Function set-modified-alist (SYMBOL MODIFIER)
-
-  Modify a value of a SYMBOL into alist MODIFIER.  The SYMBOL should
-  be alist. If it is not bound, its value regard as nil.
-
-file-detect
------------
-
-Function add-path (PATH &rest OPTIONS)
-
-  Add PATH to `load-path' if it exists under `default-load-path'
-  directories and it does not exist in `load-path'.
-
-  You can use following PATH styles:
-
-    load-path relative: "PATH" (it is searched from
-                               `defaul-load-path')
-
-    home directory relative: "~/PATH" "~USER/PATH"
-
-    absolute path: "/FOO/BAR/BAZ"
-
-  You can specify following OPTIONS:
-
-    'all-paths --- search from `load-path' instead of
-                  `default-load-path'
-
-    'append --- add PATH to the last of `load-path'
-
-Function add-latest-path (PATTERN &optional ALL-PATHS)
-
-  Add latest path matched by regexp PATTERN to `load-path' if it
-  exists under `default-load-path' directories and it does not exist
-  in `load-path'.
-
-  For example, if there is bbdb-1.50 and bbdb-1.51 under site-lisp,
-  and if bbdb-1.51 is newer than bbdb-1.50, and site-lisp is
-  /usr/local/share/emacs/site-lisp,
-
-       (add-path "bbdb")
-
-  it adds "/usr/local/share/emacs/site-lisp/bbdb-1.51" to top of
-  `load-path'.
-
-  If optional argument ALL-PATHS is specified, it is searched from all
-  of `load-path' instead of `default-load-path'.
-
-Function get-latest-path (PATTERN &optional ALL-PATHS)
-
-  Return latest directory in default-load-path which is matched to
-  regexp PATTERN.  If optional argument ALL-PATHS is specified, it is
-  searched from all of load-path instead of default-load-path.
-
-  Ex. (let ((gnus-path (get-latest-path "gnus")))
-        (add-path (expand-file-name "lisp" gnus-path))
-        (add-to-list 'Info-default-directory-list
-                    (expand-file-name "texi" gnus-path))
-        )
-
-Function file-installed-p (FILE &optional PATHS)
-
-  Return absolute-path of FILE if FILE exists in PATHS.  If PATHS is
-  omitted, `load-path' is used.
-
-Function exec-installed-p (FILE &optional PATHS SUFFIXES)
-
-  Return absolute-path of FILE if FILE exists in PATHS.  If PATHS is
-  omitted, `exec-path' is used.  If suffixes is omitted,
-  `exec-suffix-list' is used.
-
-Function module-installed-p (MODULE &optional PATHS)
-
-  Return non-nil if module is provided or exists in PATHS.  If PATHS
-  is omitted, `load-path' is used.
-
-filename
---------
-
-Function replace-as-filename (string)
-
-  Return safety file-name from STRING.
-
-  It refers variable `filename-filters'.  It is list of functions for
-  file-name filter.  Default filter refers following variables:
-
-       Variable filename-limit-length
-
-         Limit size of file-name.
-
-       Variable filename-replacement-alist
-
-         Alist list of characters vs. string as replacement.  List of
-          characters represents characters not allowed as file-name.
-
-
-Bug reports
------------
-
-  If you write bug-reports and/or suggestions for improvement, please
-  send them to the tm Mailing List:
-
-       bug-tm-en@chamonix.jaist.ac.jp  (English)
-       bug-tm-ja@chamonix.jaist.ac.jp  (Japanese)
-
-  Via the tm ML, you can report tm bugs, obtain the latest release of
-  tm, and discuss future enhancements to tm. To join the tm ML, send
-  e-mail to
-
-       tm-ja-admin@chamonix.jaist.ac.jp        (Japanese)
-       tm-en-admin@chamonix.jaist.ac.jp        (English)
-
-  Since the user registration is done manually, please write the mail
-  body in human-recognizable language (^_^).