[ViewVC] Diff of: cvs/BDB/BDB.pm

Comparing BDB/BDB.pm (file contents):
Revision 1.45 by root, Wed Jul 9 21:16:14 2008 UTC vs.
Revision 1.46 by root, Thu Jul 17 12:09:56 2008 UTC

 no warnings;
 use strict 'vars';
 use base 'Exporter';
+our $VERSION;
 BEGIN {
-   our $VERSION = '1.7';
+   $VERSION = '1.7';
    our @BDB_REQ = qw(
       db_env_open db_env_close db_env_txn_checkpoint db_env_lock_detect
       db_env_memp_sync db_env_memp_trickle db_env_dbrename db_env_dbremove
       db_open db_close db_compact db_sync db_upgrade
 =back
 =cut
 sub VERSION {
+   # I was dumb enough to override the VERSION method here, so let's try
+   # to fix it up.
+   if ($_[0] eq __PACKAGE__) {
+      $VERSION
+   } else {
-   if (@_ > 0) {
+      if (@_ > 0) {
-      return undef if VERSION_v lt $_[0];
+         return undef if VERSION_v lt $_[0];
-      if (@_ > 1) {
+         if (@_ > 1) {
-         return undef if VERSION_v ge $_[1];
+            return undef if VERSION_v ge $_[1];
+         }
       }
+      VERSION_v
    }
-   VERSION_v
 }
 =head3 CONTROLLING THE NUMBER OF THREADS
 =over 4

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines