use Test::More tests => 4;
use App::Rgit::Config;
-use App::Rgit::Utils qw/:levels/;
+use App::Rgit::Utils qw<:levels>;
local $SIG{__WARN__} = sub { diag 'warning:', @_ };
local $SIG{__DIE__} = sub { diag 'exception:', @_ };
my $buf = '';
close STDERR;
open STDERR, '>', \$buf or die "open(STDERR, '>', \\\$buf): $!";
- $arc->$_($_) for qw/info warn err crit/;
+ $arc->$_($_) for qw<info warn err crit>;
is $buf, join('', @levels[$l .. $#levels]), "level $l ok";
}