From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Wed, 3 Mar 2010 00:05:19 +0000 (-0600)
Subject: initial Log4perl commit
X-Git-Tag: v0.00200~11
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36800dd7b3b1cc19d29b47b74f61538f490fd525;p=p5sagit%2FLog-Contextual.git

initial Log4perl commit
---

diff --git a/lib/Log/Contextual.pm b/lib/Log/Contextual.pm
index 7a9349a..3d8d5b2 100644
--- a/lib/Log/Contextual.pm
+++ b/lib/Log/Contextual.pm
@@ -1,7 +1,4 @@
 # add example for Log::Dispatchouli
-# make wrapper for Log::Log4perl that fixes callstack:
-#   < mst> sub debug { local $Log::Log4perl::caller_depth =
-#          $Log::Log4perl::caller_depth + 3; shift->{l4p}->debug(@_) }
 #
 #   default logger stuff
 #   < mst> there are two cases
diff --git a/lib/Log/Contextual/Log4perl.pm b/lib/Log/Contextual/Log4perl.pm
new file mode 100644
index 0000000..c4828db
--- /dev/null
+++ b/lib/Log/Contextual/Log4perl.pm
@@ -0,0 +1,15 @@
+# make wrapper for Log::Log4perl that fixes callstack:
+#   < mst> sub debug { local $Log::Log4perl::caller_depth =
+#          $Log::Log4perl::caller_depth + 3; shift->{l4p}->debug(@_) }
+package Log::Contextual::Log4perl;
+
+1;
+
+__END__
+
+=head1 NAME
+
+Log::Contextual::Log4perl - wrapper to fix callstack for Log::Log4perl::Logger
+
+=cut
+