use ppport.h for previous perls
[p5sagit/Devel-Declare.git] / lib / Devel / Declare.pm
index 8522fb2..14f9dc2 100644 (file)
@@ -5,20 +5,21 @@ use strict;
 use warnings;
 use 5.008001;
 
-our $VERSION = '0.006020';
+our $VERSION = '0.006_020';
+
+bootstrap Devel::Declare;
+$VERSION =~ tr/_//d;
 
 use constant DECLARE_NAME => 1;
 use constant DECLARE_PROTO => 2;
 use constant DECLARE_NONE => 4;
 use constant DECLARE_PACKAGE => 8+1; # name implicit
 
-use vars qw(%declarators %declarator_handlers @ISA);
+our (%declarators, %declarator_handlers, @ISA);
 use base qw(DynaLoader);
 use Scalar::Util 'set_prototype';
 use B::Hooks::OP::Check 0.19;
 
-bootstrap Devel::Declare;
-
 @ISA = ();
 
 initialize();