Changeset 8145 for lang/perl/App-MadEye

Timestamp:

03/19/08 17:27:38 (9 months ago)

Author:

tokuhirom

Message:

- 炉がーに、レベルを表示するようにした
- ルールにプラグインを渡すことにした。

Files:

• lang/perl/App-MadEye/trunk/lib/App/MadEye.pm (modified) (2 diffs)

lang/perl/App-MadEye/trunk/lib/App/MadEye.pm

@@ -85 +85 @@
                 +{
                     target => $args->{target},
+                    plugin => $args->{plugin},
                 }
             );
@@ -123 +124 @@
     die "missing msg" unless $msg;
 
-    $self->{logger}->log( level => $level, message => "$msg\n" );
+    $self->{logger}->log( level => $level, message => "[$level]$msg\n" );
 }