Bug 156844 - 'use of uninitialized value in string eq' warning

r=jouni x2
This commit is contained in:
bbaetz%student.usyd.edu.au 2002-07-11 11:46:08 +00:00
Родитель f68aa4cb58
Коммит ae3aebbdc0
1 изменённых файлов: 2 добавлений и 0 удалений

Просмотреть файл

@ -930,6 +930,8 @@ foreach my $id (@idlist) {
my %oldhash;
my $i = 0;
foreach my $col (@::log_columns) {
# Consider NULL db entries to be equivalent to the empty string
$oldvalues[$i] ||= '';
$oldhash{$col} = $oldvalues[$i];
if (exists $::FORM{$col}) {
CheckCanChangeField($col, $id, $oldvalues[$i], $::FORM{$col});