diff options
| author | John Peacock <jpeacock@rowman.com> | 2006-05-22 15:08:03 -0400 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-05-23 07:23:48 +0000 |
| commit | c0b17f21fab4979f8ef6bccb58a7d0fe471b35e3 (patch) | |
| tree | 3506b679f27281c3efdf9fb147748df75aa92974 /lib/version.pm | |
| parent | 20de43d3034ec586969afca80b4fd86708142401 (diff) | |
| download | perl-c0b17f21fab4979f8ef6bccb58a7d0fe471b35e3.tar.gz | |
Re: [PATCH - DUH] Synchronize bleadperl with version-0.60
Message-ID: <44724453.5090606@rowman.com>
p4raw-id: //depot/perl@28288
Diffstat (limited to 'lib/version.pm')
| -rw-r--r-- | lib/version.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/version.pm b/lib/version.pm index dcf5804d6d..3fcb6b1ba1 100644 --- 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; |