diff options
| author | fukachan <fukachan> | 2001-02-06 03:47:54 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-02-06 03:47:54 +0000 |
| commit | 615a6e2ed1de57971a361bc58a6f4f698fad1349 (patch) | |
| tree | f09ed1c1882f49fe3ab7c519ca9e240697a9636b /fml/lib/FML/Process/TicketSystem.pm | |
| parent | 941a7e8d0ad4b9512dae547c32d97999230053d2 (diff) | |
| download | fml8-615a6e2ed1de57971a361bc58a6f4f698fad1349.tar.gz fml8-615a6e2ed1de57971a361bc58a6f4f698fad1349.tar.bz2 fml8-615a6e2ed1de57971a361bc58a6f4f698fad1349.zip | |
actually require( Ticket::Model::$config->{ ticket_model } )
Diffstat (limited to 'fml/lib/FML/Process/TicketSystem.pm')
| -rw-r--r-- | fml/lib/FML/Process/TicketSystem.pm | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/fml/lib/FML/Process/TicketSystem.pm b/fml/lib/FML/Process/TicketSystem.pm index eafeebf6..9130686d 100644 --- a/fml/lib/FML/Process/TicketSystem.pm +++ b/fml/lib/FML/Process/TicketSystem.pm @@ -36,10 +36,13 @@ sub prepare ; } + sub run { my ($curproc, $args) = @_; + # use Data::Dumper; print Dumper( $args ); sleep 30; + $curproc->lock(); { $curproc->_ticket_list_up($args); @@ -53,15 +56,7 @@ sub _ticket_list_up my ($curproc, $args) = @_; my $config = $curproc->{ config }; my $model = $config->{ ticket_model }; - my $pkg = "FML::Ticket::Model::"; - - if ($model eq 'toymodel') { - $pkg .= $model; - } - else { - Log("ticket: unknown model"); - return; - } + my $pkg = "FML::Ticket::Model::". $model; # fake use() to do "use FML::Ticket::$model;" eval qq{ require $pkg; $pkg->import();}; |
