Mailing List Archive

Author: richter
Date: Sun Apr 19 11:54:27 2015
New Revision: 1674610

URL: http://svn.apache.org/r1674610
Log:
check undef

Modified:
perl/embperl/trunk/Embperl/Form/ControlMultValue.pm

Modified: perl/embperl/trunk/Embperl/Form/ControlMultValue.pm
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/ControlMultValue.pm?rev=1674610&r1=1674609&r2=1674610&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/ControlMultValue.pm (original)
+++ perl/embperl/trunk/Embperl/Form/ControlMultValue.pm Sun Apr 19 11:54:27 2015
@@ -107,7 +107,7 @@ sub get_all_values
$values = $self -> {values} ;
$options = $self -> {options} || $values ;
$options = $self -> form -> convert_options ($self, $self -> {values}, $options, $req)
- if (!$self -> {showoptions}) ;
+ if (!$self -> {showoptions} && $self -> form) ;
}

if (!$addtop && !$addbottom)



---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org