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

Fix JSON handling in WebGUI::Workflow::Cron.

Browse source 
There's gonna be a whole bunch of these, since JSON throws
an exception unless you pass it something that looks like
valid JSON.
This commit is contained in:
Colin Kuskie 2008-01-31 04:49:59 +00:00
parent 8ce611b368
commit e491447ed9
1 changed files with 12 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lib/WebGUI/Workflow/Cron.pm
View file

@ -113,13 +113,18 @@ Returns the value for a given property. See the set() method for details.
=cut
sub get {
my $self = shift;
my $name = shift;
if ($name eq "parameters") {
my $parameters = JSON::from_json($self->{_data}{$name});
return $parameters->{parameters};
}
return $self->{_data}{$name};
my $self = shift;
my $name = shift;
if ($name eq "parameters") {
if (exists $self->{_data}{parameters} and ref($self->{_data}{parameters}) eq 'HASH' ) {
my $parameters = JSON::from_json($self->{_data}{$name});
return $parameters->{parameters};
}
else {
return undef;
}
}
return $self->{_data}{$name};
}
#-------------------------------------------------------------------