From 6a0b1912dba48adcbaa4d84615c64d4cb5e34fa2 Mon Sep 17 00:00:00 2001 From: kaoru Date: Tue, 31 Oct 2000 02:51:12 +0000 Subject: [PATCH] * elmo-version.el (elmo-version): Move to top. --- elmo/ChangeLog | 2 ++ elmo/elmo-version.el | 11 ++++++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 08cf6e3..923af70 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,7 @@ 2000-10-31 TAKAHASHI Kaoru + * elmo-version.el (elmo-version): Move to top. + * elmo-cache.el (toplevel): Fixed multiple Author header format. * elmo-imap4.el (toplevel): Ditto. * elmo-localdir.el (toplevel): Ditto. diff --git a/elmo/elmo-version.el b/elmo/elmo-version.el index 07d673e..385f312 100644 --- a/elmo/elmo-version.el +++ b/elmo/elmo-version.el @@ -1,7 +1,7 @@ ;;; elmo-version.el -- Version information for ELMO. -;; Copyright 2000 Yuuichi Teranishi -;; TAKAHASHI Kaoru +;; Copyright (C) 2000 Yuuichi Teranishi +;; Copyright (C) 2000 TAKAHASHI Kaoru ;; Author: Yuuichi Teranishi ;; TAKAHASHI Kaoru @@ -33,6 +33,10 @@ (require 'product) (provide 'elmo-version) ; have to declare in the top. +;; product-define in the first place +(product-provide 'elmo-version + (product-define "ELMO" nil '(2 3 92))) + ;; For APEL 10.2 or earlier. (defun-maybe product-version-as-string (product) "Return version number of product as a string. @@ -47,9 +51,6 @@ If optional argument UPDATE is non-nil, then regenerate (product-version product) "."))))) -(product-provide 'elmo-version - (product-define "ELMO" nil '(2 3 92))) - ;; set version-string (product-version-as-string 'elmo-version) -- 1.7.10.4