From ece9ad29e93f08cdb36e63f99da7ef1f49837e52 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Fri, 20 May 2011 08:27:02 -0600 Subject: [PATCH] podcheck.t: Fully qualify carp call from package --- t/porting/podcheck.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t index f8f7c72..f343181 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; } -- 2.7.4