fix warning: Unquoted string "strictures" may clash with future reserved word

mika/1.003-1
Lars Dieckow 13 years ago
parent 5d1a6fccb0
commit 3319aec82e

@ -1,6 +1,6 @@
package Sipwise::Base; package Sipwise::Base;
use utf8; use utf8;
use Module::Runtime qw(require_module); use Module::Runtime qw(use_module);
use parent 'autodie'; use parent 'autodie';
our $VERSION = '1.000'; our $VERSION = '1.000';
@ -8,11 +8,8 @@ sub import {
my ($class) = @_; my ($class) = @_;
my $caller = caller; my $caller = caller;
require_module('strictures'); use_module('strictures')->import(1);
strictures->import(1); use_module('perl5i::2')->import(-skip => [qw(Signatures Try::Tiny)]);
require_module('perl5i::2');
perl5i::2->import(-skip => [qw(Signatures Try::Tiny)]);
eval <<""; eval <<"";
package $caller; package $caller;

Loading…
Cancel
Save