diff --git a/members/memberentry.pl b/members/memberentry.pl index c665b6e957..a8e764cab0 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -549,7 +549,7 @@ BEGIN # -------------------------------------------------------------------------------------------------------- #in modify mod :default value from $CGIbranch comes from borrowers table #in add mod: default value come from branches table (ip correspendence) -$default=$data{'branchcode'} if ($op eq 'modify' || ($op eq 'add' && $category_type eq 'C')); +$default=$data{'branchcode'} if ($op eq 'modify' || ($op eq 'add' && $category_type eq 'C' && $data{'branchcode'})); $CGIbranch = CGI::scrolling_list(-id => 'branchcode', -name => 'branchcode', -values => \@select_branch,