Fix typo.

[elisp/wanderlust.git] / elmo / elmo-database.el

diff --git a/elmo/elmo-database.el b/elmo/elmo-database.el
index 2b6a61b..7f107e9 100644 (file)
--- a/elmo/elmo-database.el
+++ b/elmo/elmo-database.el
@@ -1,10 +1,9 @@
 ;;; elmo-database.el -- Database module for ELMO.
 
-;; Copyright 1998,1999,2000 Yuuichi Teranishi <teranisi@gohome.org>
+;; Copyright (C) 1998,1999,2000 Yuuichi Teranishi <teranisi@gohome.org>
 
 ;; Author: Yuuichi Teranishi <teranisi@gohome.org>
 ;; Keywords: mail, net news
-;; Time-stamp: <2000-01-07 00:19:44 teranisi>
 
 ;; This file is part of ELMO (Elisp Library for Message Orchestration).
 
@@ -55,20 +54,21 @@
     (and msgid db
         (progn
           (remove-database msgid db)
-          (put-database msgid (prin1-to-string 
+          (put-database msgid (prin1-to-string
                                (list folder number)) db)))))
 
 (defun elmo-database-msgid-delete (msgid)
-  (remove-database msgid (elmo-database-get 
+  (remove-database msgid (elmo-database-get
                          'elmo-database-msgid
                          elmo-database-msgid-filename)))
 
 (defun elmo-database-msgid-get (msgid)
-  (let ((match (get-database msgid (elmo-database-get 
+  (let ((match (get-database msgid (elmo-database-get
                                    'elmo-database-msgid
                                    elmo-database-msgid-filename))))
     (and match (read match))))
 
-(provide 'elmo-database)
+(require 'product)
+(product-provide (provide 'elmo-database) (require 'elmo-version))
 
 ;;; elmo-database.el ends here