Changeset 11803 for lang/perl/Punc

Timestamp:

05/18/08 00:55:42 (6 months ago)

Author:

mizzy

Message:

Punc->logger をちょっと変更。でもログ周りはあとで大きく変えると思う。

Files:

• lang/perl/Punc/trunk/lib/Punc.pm (modified) (1 diff)

lang/perl/Punc/trunk/lib/Punc.pm

@@ -47 +47 @@
 sub log {
     my ( $self, $level, $message ) = @_;
+    $self->logger->require;
     $self->logger->log( $level => $message );
 }