Add product information.
authorkeiichi <keiichi>
Mon, 20 Dec 1999 11:11:45 +0000 (11:11 +0000)
committerkeiichi <keiichi>
Mon, 20 Dec 1999 11:11:45 +0000 (11:11 +0000)
54 files changed:
alist.el
atype.el
broken.el
calist.el
emu-mule.el
emu.el
env.el
file-detect.el
filename.el
install.el
inv-18.el
inv-19.el
inv-xemacs.el
invisible.el
localhook.el
mcharset.el
mcs-20.el
mcs-e20.el
mcs-ltn1.el
mcs-nemacs.el
mcs-om.el
mcs-xm.el
mcs-xmu.el
mule-caesar.el
path-util.el
pccl-20.el
pccl-om.el
pccl.el
pces-20.el
pces-e20.el
pces-e20_2.el
pces-nemacs.el
pces-om.el
pces-raw.el
pces-xfc.el
pces-xm.el
pces.el
pcustom.el
poe-18.el
poe-xemacs.el
poe.el
poem-e20.el
poem-e20_2.el
poem-e20_3.el
poem-ltn1.el
poem-nemacs.el
poem-om.el
poem-xm.el
poem.el
richtext.el
static.el
time-stamp.el
tinycustom.el
tinyrich.el

index fbd409a..c016c92 100644 (file)
--- a/alist.el
+++ b/alist.el
@@ -100,6 +100,7 @@ its value regard as nil."
 ;;; @ end
 ;;;
 
-(provide 'alist)
+(require 'product)
+(product-provide (provide 'alist) (require 'apel-ver))
 
 ;;; alist.el ends here
index 81c2866..b595296 100644 (file)
--- a/atype.el
+++ b/atype.el
 ;;; @ end
 ;;;
 
-(provide 'atype)
+(require 'product)
+(product-provide (provide 'atype) (require 'apel-ver))
 
 ;;; atype.el ends here
index c5d5e40..c74eb63 100644 (file)
--- a/broken.el
+++ b/broken.el
@@ -108,6 +108,7 @@ compile(macro expansion) time and run time, warn it."
 ;;; @ end
 ;;;
 
-(provide 'broken)
+(require 'product)
+(product-provide (provide 'broken) (require 'apel-ver))
 
 ;;; broken.el ends here
index 88c6ec4..fbef680 100644 (file)
--- a/calist.el
+++ b/calist.el
@@ -325,6 +325,7 @@ even if other rules are matched for ALIST."
 ;;; @ end
 ;;;
 
-(provide 'calist)
+(require 'product)
+(product-provide (provide 'calist) (require 'apel-ver))
 
 ;;; calist.el ends here
index 62cb5ce..b837e0f 100644 (file)
@@ -55,6 +55,7 @@
 ;;; @ end
 ;;;
 
-(provide 'emu-mule)
+(require 'product)
+(product-provide (provide 'emu-mule) (require 'apel-ver))
 
 ;;; emu-mule.el ends here
diff --git a/emu.el b/emu.el
index 038b7fb..d610c53 100644 (file)
--- a/emu.el
+++ b/emu.el
@@ -227,6 +227,7 @@ find-file-hooks, etc.
 ;;; @ end
 ;;;
 
-(provide 'emu)
+(require 'product)
+(product-provide (provide 'emu) (require 'apel-ver))
 
 ;;; emu.el ends here
diff --git a/env.el b/env.el
index c0e68f6..bc28492 100644 (file)
--- a/env.el
+++ b/env.el
@@ -109,6 +109,7 @@ This function works by modifying `process-environment'."
                    (cons (concat variable "=" value)
                          process-environment)))))))
 
-(provide 'env)
+(require 'product)
+(product-provide (provide 'env) (require 'apel-ver))
 
 ;;; env.el ends here
index ce6f9bf..6dc86be 100644 (file)
@@ -33,6 +33,7 @@
 
 (require 'path-util)
 
-(provide 'file-detect)
+(require 'product)
+(product-provide (provide 'file-detect) (require 'apel-ver))
 
 ;;; file-detect.el ends here
index c2cc48c..bbe1f9a 100644 (file)
@@ -147,6 +147,7 @@ It refers variable `filename-filters' and default filters refers
 ;;; @ end
 ;;;
 
-(provide 'filename)
+(require 'product)
+(product-provide (provide 'filename) (require 'apel-ver))
 
 ;;; filename.el ends here
index 4ddd36c..1aa56a3 100644 (file)
@@ -234,6 +234,7 @@ to create parent directories if they don't exist."
 ;;; @ end
 ;;;
 
-(provide 'install)
+(require 'product)
+(product-provide (provide 'install) (require 'apel-ver))
 
 ;;; install.el ends here
index 21e54ca..dfeb653 100644 (file)
--- a/inv-18.el
+++ b/inv-18.el
@@ -80,6 +80,7 @@
 ;;; @ end
 ;;;
 
-(provide 'inv-18)
+(require 'product)
+(product-provide (provide 'inv-18) (require 'apel-ver))
 
 ;;; inv-18.el ends here
index 3f99a03..2fafbf3 100644 (file)
--- a/inv-19.el
+++ b/inv-19.el
@@ -58,6 +58,7 @@
 ;;; @ end
 ;;;
 
-(provide 'inv-19)
+(require 'product)
+(product-provide (provide 'inv-19) (require 'apel-ver))
 
 ;;; inv-19.el ends here
index c6c056b..128bc89 100644 (file)
@@ -65,6 +65,7 @@
 ;;; @ end
 ;;;
 
-(provide 'inv-xemacs)
+(require 'product)
+(product-provide (provide 'inv-xemacs) (require 'apel-ver))
 
 ;;; inv-xemacs.el ends here
index 265ee92..0cab393 100644 (file)
@@ -40,6 +40,7 @@
 ;;; @ end
 ;;;
 
-(provide 'invisible)
+(require 'product)
+(product-provide (provide 'invisible) (require 'apel-ver))
 
 ;;; invisible.el ends here
index 8c1bf11..f8e59cc 100644 (file)
 
 ;;; Code:
 
-(provide 'localhook)                   ; beware of circular dependency.
+;; beware of circular dependency.
+(require 'product)
+(product-provide (provide 'localhook) (require 'apel-ver))
+
 (require 'poe)                         ; this file is loaded from poe.el.
 
 ;; These two functions are not complete, but work enough for our purpose.
index 44a65cb..156c34e 100644 (file)
@@ -113,6 +113,7 @@ variable `default-mime-charset-for-write' is returned."
 ;;; @ end
 ;;;
 
-(provide 'mcharset)
+(require 'product)
+(product-provide (provide 'mcharset) (require 'apel-ver))
 
 ;;; mcharset.el ends here
index b4472d5..77911a4 100644 (file)
--- a/mcs-20.el
+++ b/mcs-20.el
@@ -155,6 +155,7 @@ It must be symbol."
 ;;; @ end
 ;;;
 
-(provide 'mcs-20)
+(require 'product)
+(product-provide (provide 'mcs-20) (require 'apel-ver))
 
 ;;; mcs-20.el ends here
index 6d54a01..00b621e 100644 (file)
@@ -179,6 +179,7 @@ Return nil if corresponding MIME-charset is not found."
 
 (require 'mcs-20)
 
-(provide 'mcs-e20)
+(require 'product)
+(product-provide (provide 'mcs-e20) (require 'apel-ver))
 
 ;;; mcs-e20.el ends here
index 643bb2a..17a93bb 100644 (file)
 ;;; @ end
 ;;;
 
-(provide 'mcs-ltn1)
+(require 'product)
+(product-provide (provide 'mcs-ltn1) (require 'apel-ver))
 
 ;;; mcs-ltn1.el ends here
index 388db8a..0251369 100644 (file)
 ;;; @ end
 ;;;
 
-(provide 'mcs-nemacs)
+(require 'product)
+(product-provide (provide 'mcs-nemacs) (require 'apel-ver))
 
 ;;; mcs-nemacs.el ends here
index 6f469d8..17f6ec1 100644 (file)
--- a/mcs-om.el
+++ b/mcs-om.el
@@ -237,6 +237,7 @@ It must be symbol.")
 ;;; @ end
 ;;;
 
-(provide 'mcs-om)
+(require 'product)
+(product-provide (provide 'mcs-om) (require 'apel-ver))
 
 ;;; mcs-om.el ends here
index d3de9cf..0fd6d8d 100644 (file)
--- a/mcs-xm.el
+++ b/mcs-xm.el
@@ -159,6 +159,7 @@ Return nil if corresponding MIME-charset is not found."
 ;;; @ end
 ;;;
 
-(provide 'mcs-xm)
+(require 'product)
+(product-provide (provide 'mcs-xm) (require 'apel-ver))
 
 ;;; mcs-xm.el ends here
index dadc2cf..e80c925 100644 (file)
@@ -95,6 +95,7 @@ works for only decoding MIME-CHARSET.  If it is nil, size is unlimited."
 ;;; @ end
 ;;;
 
-(provide 'mcs-xmu)
+(require 'product)
+(product-provide (provide 'mcs-xmu) (require 'apel-ver))
 
 ;;; mcs-xmu.el ends here
index 4bc32ea..e03fa20 100644 (file)
@@ -80,6 +80,7 @@ for 96 or 96x96 graphic character set)."
          )))))
 
 
-(provide 'mule-caesar)
+(require 'product)
+(product-provide (provide 'mule-caesar) (require 'apel-ver))
 
 ;;; mule-caesar.el ends here
index bfdf7bb..d774642 100644 (file)
@@ -197,6 +197,7 @@ If PATHS is omitted, `load-path' is used."
 ;;; @ end
 ;;;
 
-(provide 'path-util)
+(require 'product)
+(product-provide (provide 'path-util) (require 'apel-ver))
 
 ;;; path-util.el ends here
index 3782b7c..62c1c39 100644 (file)
@@ -151,6 +151,7 @@ If CCL-PROG is symbol, it is dereferenced.
 ;;; @ end
 ;;;
 
-(provide 'pccl-20)
+(require 'product)
+(product-provide (provide 'pccl-20) (require 'apel-ver))
 
 ;;; pccl-20.el ends here
index 205bce7..3ab0378 100644 (file)
@@ -125,6 +125,7 @@ If CCL-PROG is symbol, it is dereferenced.
 ;;; @ end
 ;;;
 
-(provide 'pccl-om)
+(require 'product)
+(product-provide (provide 'pccl-om) (require 'apel-ver))
 
 ;;; pccl-om.el ends here
diff --git a/pccl.el b/pccl.el
index 9397b9a..c696f75 100644 (file)
--- a/pccl.el
+++ b/pccl.el
@@ -71,6 +71,7 @@
 ;;; @ end
 ;;;
 
-(provide 'pccl)
+(require 'product)
+(product-provide (provide 'pccl) (require 'apel-ver))
 
 ;;; pccl.el ends here
index 51335a7..6531710 100644 (file)
@@ -233,6 +233,7 @@ applied to `coding-system-for-write'."
 ;;; @ end
 ;;;
 
-(provide 'pces-20)
+(require 'product)
+(product-provide (provide 'pces-20) (require 'apel-ver))
 
 ;;; pces-20.el ends here
index 6516157..724f8af 100644 (file)
@@ -42,7 +42,7 @@
 ;;; @ end
 ;;;
 
-
-(provide 'pces-e20)
+(require 'product)
+(product-provide (provide 'pces-e20) (require 'apel-ver))
 
 ;;; pces-e20.el ends here
index 8fa59f7..5f97e04 100644 (file)
@@ -144,6 +144,7 @@ be applied to `coding-system-for-read'."
 ;;; @ end
 ;;;
 
-(provide 'pces-e20_2)
+(require 'product)
+(product-provide (provide 'pces-e20_2) (require 'apel-ver))
 
 ;;; pces-e20_2.el ends here
index 6cfebfe..6f29ea1 100644 (file)
@@ -270,6 +270,7 @@ applied to `kanji-fileio-code'. [emu-nemacs.el]"
 ;;; @ end
 ;;;
 
-(provide 'pces-nemacs)
+(require 'product)
+(product-provide (provide 'pces-nemacs) (require 'apel-ver))
 
 ;;; pces-nemacs.el ends here
index fdbb648..788498e 100644 (file)
@@ -307,6 +307,7 @@ conversion except for line-break code."
 ;;; @ end
 ;;;
 
-(provide 'pces-om)
+(require 'product)
+(product-provide (provide 'pces-om) (require 'apel-ver))
 
 ;;; pces-om.el ends here
index a7bed6e..54c751d 100644 (file)
@@ -166,6 +166,7 @@ code conversion will not take place."
 ;;; @ end
 ;;;
 
-(provide 'pces-raw)
+(require 'product)
+(product-provide (provide 'pces-raw) (require 'apel-ver))
 
 ;;; pces-raw.el ends here
index 8944509..1200993 100644 (file)
@@ -42,6 +42,7 @@
 ;;; @ end
 ;;;
 
-(provide 'pces-xfc)
+(require 'product)
+(product-provide (provide 'pces-xfc) (require 'apel-ver))
 
 ;;; pces-xfc.el ends here
index 956c5c5..083fc56 100644 (file)
@@ -72,6 +72,7 @@
 ;;; @ end
 ;;;
 
-(provide 'pces-xm)
+(require 'product)
+(product-provide (provide 'pces-xm) (require 'apel-ver))
 
 ;;; pces-xm.el ends here
diff --git a/pces.el b/pces.el
index 283951c..85bce8c 100644 (file)
--- a/pces.el
+++ b/pces.el
@@ -53,6 +53,7 @@
 ;;; @ end
 ;;;
 
-(provide 'pces)
+(require 'product)
+(product-provide (provide 'pces) (require 'apel-ver))
 
 ;;; pces.el ends here
index 28a9321..bd5099e 100644 (file)
@@ -68,6 +68,7 @@
       ;; load emulation version of "new custom".
       (require 'tinycustom)))
 
-(provide 'pcustom)
+(require 'product)
+(product-provide (provide 'pcustom) (require 'apel-ver))
 
 ;;; pcustom.el ends here
index 7ee62ce..27dcc96 100644 (file)
--- a/poe-18.el
+++ b/poe-18.el
 
 ;;; Code:
 
-(provide 'poe-18)                      ; beware of circular dependency.
+;; beware of circular dependency.
+(require 'product)
+(product-provide (provide 'poe-18) (require 'apel-ver))
+
 (require 'poe)                         ; load definitions of `*-maybe'.
 
 ;;; @ for EMACS 18.55
index a6b8516..cfa7761 100644 (file)
@@ -148,6 +148,7 @@ FILE should be the name of a library, with no directory name."
 ;;; @ end
 ;;;
 
-(provide 'poe-xemacs)
+(require 'product)
+(product-provide (provide 'poe-xemacs) (require 'apel-ver))
 
 ;;; poe-xemacs.el ends here
diff --git a/poe.el b/poe.el
index 1059128..9812800 100644 (file)
--- a/poe.el
+++ b/poe.el
@@ -29,7 +29,8 @@
 
 ;;; Code:
 
-(provide 'poe)
+(require 'product)
+(product-provide (provide 'poe) (require 'apel-ver))
 
 (or (boundp 'current-load-list) (setq current-load-list nil))
 
index 57a6378..ac2a17e 100644 (file)
@@ -59,6 +59,7 @@ in the region between START and END."
   (require 'poem-e20_2) ; for Emacs 20.1 and 20.2
   )
 
-(provide 'poem-e20)
+(require 'product)
+(product-provide (provide 'poem-e20) (require 'apel-ver))
 
 ;;; poem-e20.el ends here
index 2f9fc77..62518e6 100644 (file)
@@ -87,6 +87,7 @@ but the contents viewed as characters do change.
 ;;; @ end
 ;;;
 
-(provide 'poem-e20_2)
+(require 'product)
+(product-provide (provide 'poem-e20_2) (require 'apel-ver))
 
 ;;; poem-e20_2.el ends here
index df9af37..9beb320 100644 (file)
@@ -60,6 +60,7 @@
 ;;; @ end
 ;;;
 
-(provide 'poem-e20_3)
+(require 'product)
+(product-provide (provide 'poem-e20_3) (require 'apel-ver))
 
 ;;; poem-e20_3.el ends here
index 19bb3e0..3735173 100644 (file)
@@ -146,6 +146,7 @@ Optional non-nil arg START-COLUMN specifies the starting column.
 ;;; @ end
 ;;;
 
-(provide 'poem-ltn1)
+(require 'product)
+(product-provide (provide 'poem-ltn1) (require 'apel-ver))
 
 ;;; poem-ltn1.el ends here
index 5bd8915..7016426 100644 (file)
@@ -213,6 +213,7 @@ Optional non-nil arg START-COLUMN specifies the starting column.
 ;;; @ end
 ;;;
 
-(provide 'poem-nemacs)
+(require 'product)
+(product-provide (provide 'poem-nemacs) (require 'apel-ver))
 
 ;;; poem-nemacs.el ends here
index 39460ad..54dc3c5 100644 (file)
@@ -158,6 +158,7 @@ Optional non-nil arg START-COLUMN specifies the starting column.
 ;;; @ end
 ;;;
 
-(provide 'poem-om)
+(require 'product)
+(product-provide (provide 'poem-om) (require 'apel-ver))
 
 ;;; poem-om.el ends here
index 7f85b96..7dd4244 100644 (file)
@@ -81,6 +81,7 @@ but the contents viewed as characters do change.
 ;;; @ end
 ;;;
 
-(provide 'poem-xm)
+(require 'product)
+(product-provide (provide 'poem-xm) (require 'apel-ver))
 
 ;;; poem-xm.el ends here
diff --git a/poem.el b/poem.el
index f65556d..ec752a3 100644 (file)
--- a/poem.el
+++ b/poem.el
@@ -94,6 +94,7 @@ N defaults to 0 if omitted. [XEmacs-mule emulating function]"
 ;;; @ end
 ;;;
 
-(provide 'poem)
+(require 'product)
+(product-provide (provide 'poem) (require 'apel-ver))
 
 ;;; poem.el ends here
index 07e2f64..def5c28 100644 (file)
@@ -179,6 +179,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
 ;;; @ end
 ;;;
 
-(provide 'richtext)
+(require 'product)
+(product-provide (provide 'richtext) (require 'apel-ver))
 
 ;;; richtext.el ends here
index 039fc06..b64440d 100644 (file)
--- a/static.el
+++ b/static.el
@@ -83,6 +83,7 @@ The variable SYMBOL can be referenced at either compile-time or run-time."
 ;;; @ end
 ;;;
 
-(provide 'static)
+(require 'product)
+(product-provide (provide 'static) (require 'apel-ver))
 
 ;;; static.el ends here
index d986eaf..81d0d0b 100644 (file)
@@ -274,7 +274,8 @@ The first character of DD is space if the value is less than 10."
     (concat (substring date 11 13)
            (substring date 14 16))))
 
-(provide 'time-stamp)
+(require 'product)
+(product-provide (provide 'time-stamp) (require 'apel-ver))
 
 ;;; time-stamp.el ends here
 
index 54a6678..5df4e37 100644 (file)
@@ -157,7 +157,9 @@ The third argument DOC is a documentation string for the widget.
 This is a nop define-widget only for emulating purpose."
   nil)
 
-(provide 'tinycustom)
 (provide 'custom)
 
+(require 'product)
+(product-provide (provide 'tinycustom) (require 'apel-ver))
+
 ;;; tinycustom.el ends here.
index 3929205..2cfee07 100644 (file)
 ;;; @ end
 ;;;
 
-(provide 'tinyrich)
+(require 'product)
+(product-provide (provide 'tinyrich) (require 'apel-ver))
+
+;; tinyrich.el ends here.