add set_adapter for backward compatibility

jonswar · Oct 27, 2009 · c50c6d9 · c50c6d9
1 parent 6e220fc
commit c50c6d9
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/lib/Log/Any.pm b/lib/Log/Any.pm
@@ -87,6 +87,13 @@ sub detection_methods             { @detection_methods }
 sub detection_aliases             { @detection_aliases }
 sub logging_and_detection_methods { @logging_and_detection_methods }
 
+# For backward compatibility
+sub set_adapter {
+    my $class = shift;
+    require Log::Any::Adapter;
+    Log::Any::Adapter->set(@_);
+}
+
 1;
 
 __END__