* Model::Base: add debug(), error(), etc...

diff --git a/src/newslash_web/lib/Newslash/Model/Base.pm b/src/newslash_web/lib/Newslash/Model/Base.pm
index 6f28bc3..c531827 100644 (file)
--- a/src/newslash_web/lib/Newslash/Model/Base.pm
+++ b/src/newslash_web/lib/Newslash/Model/Base.pm
@@ -68,21 +68,21 @@ sub logger {
     }
     # return dummy object
     return {
-            append => sub {},
             debug => sub {},
             error => sub {},
             fatal => sub {},
             info => sub {},
-            is_level => sub {},
             warn => sub {},
+            append => sub {},
+            is_level => sub {},
            };
 }
 
-sub warn {
-    my $self = shift;
-    my $val = shift;
-    $self->logger->warn($val);
-}
+sub debug { shift->logger->debug(@_); }
+sub warn { shift->logger->warn(@_); }
+sub error { shift->logger->error(@_); }
+sub fatal { shift->logger->fatal(@_); }
+sub info { shift->logger->info(@_); }
 
 
 1;