Fixing my syntax error, whoops

This commit is contained in:
rangi 2006-05-22 23:13:56 +00:00
parent 9bf0cfa4b9
commit 42be25f242

View file

@ -25,7 +25,7 @@ use C4::Context;
use vars qw($VERSION @ISA @EXPORT);
$VERSION = do { my @v = '$Revision$' =~ /\d+/g;
$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
=head1 NAME