cleaner dev version stuff; thanks to riba
Arthur Axel "fREW" Schmidt [Sun, 11 Apr 2010 17:15:24 +0000 (17:15 +0000)]
lib/SQL/Abstract.pm

index 34b046a..6c7fc60 100644 (file)
@@ -18,7 +18,7 @@ use Scalar::Util ();
 our $VERSION  = '1.64_01';
 
 # This would confuse some packagers
-#$VERSION      = eval $VERSION; # numify for warning-free dev releases
+$VERSION = eval $VERSION if $VERSION =~ /_/; # numify for warning-free dev releases
 
 our $AUTOLOAD;