From e51a34f4965929ad4e60d9437793c3e0254e31dc Mon Sep 17 00:00:00 2001
From: rjray <devnull@localhost>
Date: Wed, 2 Aug 2000 08:04:31 +0000
Subject: [PATCH] Start using an explicit value for $VERSION

CVS patchset: 3998
CVS date: 2000/08/02 08:04:31
---
 Perl-RPM/RPM/Database.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Perl-RPM/RPM/Database.pm b/Perl-RPM/RPM/Database.pm
index 9e67290..ab34730 100644
--- a/Perl-RPM/RPM/Database.pm
+++ b/Perl-RPM/RPM/Database.pm
@@ -5,7 +5,7 @@
 #
 ###############################################################################
 #
-#   $Id: Database.pm,v 1.3 2000/06/22 08:42:00 rjray Exp $
+#   $Id: Database.pm,v 1.4 2000/08/02 08:04:31 rjray Exp $
 #
 #   Description:    The RPM::Database class provides access to the RPM database
 #                   as a tied hash, whose keys are taken as the names of
@@ -36,8 +36,8 @@ use subs qw(new);
 require RPM;
 require RPM::Header;
 
-$VERSION = $RPM::VERSION;
-$revision = do { my @r=(q$Revision: 1.3 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r };
+$VERSION = '0.27';
+$revision = do { my @r=(q$Revision: 1.4 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r };
 
 1;
 
-- 
2.7.4