Author: REHSACK
Date: Mon Jul  5 06:13:16 2010
New Revision: 14232

Modified:
   dbi/trunk/lib/DBD/DBM.pm

Log:
tidy

Modified: dbi/trunk/lib/DBD/DBM.pm
==============================================================================
--- dbi/trunk/lib/DBD/DBM.pm    (original)
+++ dbi/trunk/lib/DBD/DBM.pm    Mon Jul  5 06:13:16 2010
@@ -37,7 +37,7 @@
     # do the real work in DBD::File
     #
     $attr->{Attribution} = 'DBD::DBM by Jens Rehsack';
-    my $this = $class->SUPER::driver($attr);
+    $drh = $class->SUPER::driver($attr);
 
     # install private methods
     #
@@ -50,7 +50,7 @@
         DBD::DBM::st->install_method('dbm_schema');
     }
 
-    $this;
+    return $drh;
 }
 
 sub CLONE

Reply via email to