Revert change 28322, which makes ithreads panic

[p5sagit/p5-mst-13.2.git] / lib / version.pm

diff --git a/lib/version.pm b/lib/version.pm
index dcf5804..3fcb6b1 100644 (file)
--- a/lib/version.pm
+++ b/lib/version.pm
@@ -6,7 +6,7 @@ use strict;
 
 use vars qw(@ISA $VERSION $CLASS *qv);
 
-$VERSION = "0.60_01";
+$VERSION = "0.60_02";
 $VERSION = eval($VERSION);
 
 $CLASS = 'version';
@@ -18,7 +18,9 @@ sub import {
     no strict 'refs';
     
     *{$callpkg."::qv"} = 
-           sub {return bless version::qv(shift), $class };
+           sub {return bless version::qv(shift), $class }
+       unless $callpkg->can('qv');
+
 }
 
 1;