* elmo2.el: Add (require 'elmo-version).

	* elmo-vars.el (elmo-appname, elmo-version): Move to
	elmo-version.el

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index efa8788..51f4286 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,4 @@
+
 2000-10-10  Kenichi OKADA  <okada@opaopa.org>
 
        * elmo-dop.el (elmo-dop-flush-pending-append-operations): Add no-see.
@@ -12,6 +13,9 @@
 2000-10-10  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * elmo-version.el: New file.  Use product.el.
+       * elmo2.el: Add (require 'elmo-version).
+       * elmo-vars.el (elmo-appname, elmo-version): Move to
+       elmo-version.el
 
 2000-10-09  Yuuichi Teranishi  <teranisi@gohome.org>
 

diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el
index a7b59c7..91fd2de 100644 (file)
--- a/elmo/elmo-vars.el
+++ b/elmo/elmo-vars.el
@@ -34,14 +34,6 @@
   (defun-maybe dynamic-link (a))
   (defun-maybe dynamic-call (a b)))
 
-;; Version info.
-(defconst elmo-version "2.3.0")
-(defconst elmo-appname "ELMO")
-
-(defun elmo-version ()
-  "Print ELMO version."
-  (format "%s/%s" elmo-appname elmo-version))
-
 ;; IMAP4
 (defvar elmo-default-imap4-mailbox "inbox"
   "*Default IMAP4 mailbox.")

diff --git a/elmo/elmo2.el b/elmo/elmo2.el
index efd2ff3..ae907e7 100644 (file)
--- a/elmo/elmo2.el
+++ b/elmo/elmo2.el
@@ -33,6 +33,7 @@
 (require 'elmo-msgdb)
 (require 'elmo-cache)
 (require 'elmo-util)
+(require 'elmo-version)
 (require 'elmo-dop)
 (provide 'elmo2)