File tree 1 file changed +3
-3
lines changed
1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -8481,7 +8481,7 @@ sub AddInTree {
8481
8481
}
8482
8482
return;
8483
8483
}
8484
- if ( $val{$keyval} ) { # Val is already in tree
8484
+ if ( exists( $val{$keyval}) ) { # Val is already in tree
8485
8485
if ($Debug) { debug( " val is already in tree", 4 ); }
8486
8486
$egal{$keytoadd} = $val{$keyval};
8487
8487
$val{$keyval} = $keytoadd;
@@ -8528,7 +8528,7 @@ sub AddInTree {
8528
8528
while ( $nextval{$valcursor} && ( $nextval{$valcursor} < $keyval ) ) {
8529
8529
$valcursor = $nextval{$valcursor};
8530
8530
}
8531
- if ( $nextval{$valcursor} )
8531
+ if ( exists( $nextval{$valcursor}) )
8532
8532
{ # keyval is between valcursor and nextval{valcursor}
8533
8533
$nextval{$keyval} = $nextval{$valcursor};
8534
8534
}
@@ -8556,7 +8556,7 @@ sub Removelowerval {
8556
8556
if ($Debug) {
8557
8557
debug( " remove for lowerval=$lowerval: key=$keytoremove", 4 );
8558
8558
}
8559
- if ( $egal{$keytoremove} ) {
8559
+ if ( exists( $egal{$keytoremove}) ) {
8560
8560
$val{$lowerval} = $egal{$keytoremove};
8561
8561
delete $egal{$keytoremove};
8562
8562
}
You can’t perform that action at this time.
0 commit comments