diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-05-20 08:27:02 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-05-20 08:49:19 -0600 |
commit | ece9ad29e93f08cdb36e63f99da7ef1f49837e52 (patch) | |
tree | 941c8ad71f9b494a86520b8b81cb47cccd9170be /t | |
parent | 2497e1dfd128629c4e32897343c724889bf13b43 (diff) | |
download | perl-ece9ad29e93f08cdb36e63f99da7ef1f49837e52.tar.gz |
podcheck.t: Fully qualify carp call from package
Diffstat (limited to 't')
-rw-r--r-- | t/porting/podcheck.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t index f8f7c72fa6..f343181538 100644 --- a/t/porting/podcheck.t +++ b/t/porting/podcheck.t @@ -497,7 +497,7 @@ package My::Pod::Checker { # Extend Pod::Checker } } - carp("Couldn't extract line number from $message") if $message =~ /line \d+/; + Carp::carp("Couldn't extract line number from $message") if $message =~ /line \d+/; push @{$problems{$filename{$addr}}{$message}}, $opts; #push @{$problems{$self->get_filename}{$message}}, $opts; } |