From d22d1698e88a5f82eb23ac0a47fa5b8327db926e Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Fri, 7 Jun 2013 22:38:00 -0700 Subject: [PATCH] use carp and export cache_location --- Debbugs/Libravatar.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Debbugs/Libravatar.pm b/Debbugs/Libravatar.pm index 27a879f..08915fd 100644 --- a/Debbugs/Libravatar.pm +++ b/Debbugs/Libravatar.pm @@ -42,12 +42,14 @@ use Digest::MD5 qw(md5_hex); use LWP::UserAgent; use File::Temp qw(tempfile); +use Carp; + BEGIN{ ($VERSION) = q$Revision$ =~ /^Revision:\s+([^\s+])/; $DEBUG = 0 unless defined $DEBUG; @EXPORT = (); - %EXPORT_TAGS = (libravatar => [qw(cache_valid serve_cache retrieve_libravatar)] + %EXPORT_TAGS = (libravatar => [qw(cache_valid serve_cache retrieve_libravatar cache_location)] ); @EXPORT_OK = (); Exporter::export_ok_tags(keys %EXPORT_TAGS); -- 2.39.2