From: Matt S Trout Date: Sun, 21 Mar 2010 11:42:11 +0000 (+0000) Subject: no dep X-Git-Tag: release_1.0.0~7 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FModule-Metadata.git;a=commitdiff_plain;h=3db2701705c9f302b3d08e721ff2a907c07b4f90 no dep --- diff --git a/lib/Module/Metadata.pm b/lib/Module/Metadata.pm index 330a687..fe027b7 100644 --- a/lib/Module/Metadata.pm +++ b/lib/Module/Metadata.pm @@ -17,7 +17,13 @@ $VERSION = eval $VERSION; use File::Spec; use IO::File; use Module::Metadata::Version; -use Log::Contextual qw(:log :dlog); +BEGIN { + if ($INC{'Log/Contextual.pm'}) { + Log::Contextual->import('log_info'); + } else { + *log_info = sub { warn @_ }; + } +} use File::Find qw(find); my $V_NUM_REGEXP = qr{v?[0-9._]+}; # crudely, a v-string or decimal