Bug 8895 - Warning in systempreferences.pl: Use of uninitialized value in length...
Clicking on Local use tab in system preferences results in warning in log file: systempreferences.pl: Use of uninitialized value in length at (...)/admin/systempreferences.pl line 456 Reason: content field "value" in table "systempreferences" can be NULL (and is tested for length). Added test for "defined" at to places. Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com> Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
This commit is contained in:
parent
bc7859e848
commit
c8c80a8e78
|
|
@ -428,6 +428,7 @@ sub StringSearch {
|
|||
my $sth = $dbh->prepare("Select variable,value,explanation,type,options from systempreferences where (variable like ?) order by variable");
|
||||
$sth->execute($syspref);
|
||||
while ( my $data = $sth->fetchrow_hashref ) {
|
||||
unless (defined $data->{value}) { $data->{value} = "";}
|
||||
$data->{shortvalue} = $data->{value};
|
||||
$data->{shortvalue} = substr( $data->{value}, 0, 60 ) . "..." if defined( $data->{value} ) and length( $data->{value} ) > 60;
|
||||
push( @results, $data );
|
||||
|
|
@ -460,6 +461,7 @@ sub StringSearch {
|
|||
}
|
||||
|
||||
while ( my $data = $sth->fetchrow_hashref ) {
|
||||
unless (defined $data->{value}) { $data->{value} = "";}
|
||||
$data->{shortvalue} = $data->{value};
|
||||
$data->{shortvalue} = substr( $data->{value}, 0, 60 ) . "..." if length( $data->{value} ) > 60;
|
||||
push( @results, $data );
|
||||
|
|
|
|||
Loading…
Reference in New Issue