Changeset 18350 for lang/perl/TheSchwartz-Simple/trunk/eg/work-hello.pl

Timestamp:

08/28/08 03:24:55 (4 months ago)

Author:

miyagawa

Message:

set priorities

Files:

• lang/perl/TheSchwartz-Simple/trunk/eg/work-hello.pl (modified) (1 diff)

lang/perl/TheSchwartz-Simple/trunk/eg/work-hello.pl

@@ -19 +19 @@
 
 my $client = TheSchwartz->new(databases => [ { dsn => "dbi:mysql:$dbname", user => 'root' } ]);
+$client->set_prioritize;
 $client->can_do('MyWorker');
 $client->work_once;