oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add bundles, and display list of bundles.

Browse source
This commit is contained in:
Colin Kuskie 2009-05-15 22:23:36 -07:00
parent ecb3e7d394
commit c49d53ce88
3 changed files with 70 additions and 67 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Content/FilePump.pm
View file

@ -36,15 +36,15 @@ sub handler {
my ($session) = @_;
my $output = undef;
return undef unless $session->form->get('op') eq 'filePump';
my $method = $session->form->get( 'method' )
? 'www_' . $session->form->get( 'method' )
my $func = $session->form->get( 'func' )
? 'www_' . $session->form->get( 'func' )
: 'www_manage'
;
if ($method ne "www_" && (my $sub = WebGUI::FilePump::Admin->can($method))) {
if ($func ne "www_" && (my $sub = WebGUI::FilePump::Admin->can($func))) {
$output = $sub->($session);
}
else {
WebGUI::Error::MethodNotFound->throw(error=>"Couldn't call non-existant method $method inside FilePump", method=>$method);
WebGUI::Error::MethodNotFound->throw(error=>"Couldn't call non-existant function $func inside FilePump", method=>$func);
}
return $output;
}