summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Process/TicketSystem.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-02-06 03:47:54 +0000
committerfukachan <fukachan>2001-02-06 03:47:54 +0000
commit615a6e2ed1de57971a361bc58a6f4f698fad1349 (patch)
treef09ed1c1882f49fe3ab7c519ca9e240697a9636b /fml/lib/FML/Process/TicketSystem.pm
parent941a7e8d0ad4b9512dae547c32d97999230053d2 (diff)
downloadfml8-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.pm13
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();};