diff --git a/lib/WebGUI/Workflow/Instance.pm b/lib/WebGUI/Workflow/Instance.pm index 352ec12cc..f114a6b5d 100644 --- a/lib/WebGUI/Workflow/Instance.pm +++ b/lib/WebGUI/Workflow/Instance.pm @@ -144,13 +144,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}; } #-------------------------------------------------------------------