From b130d740325c7c93c357c729c594ea9e30b38e64 Mon Sep 17 00:00:00 2001
From: oleonard <oleonard>
Date: Wed, 31 Dec 2003 18:08:33 +0000
Subject: [PATCH] Added 'id' attribute to ethnicity, categorycode, and
 branchcode select lists

---
 memberentry.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/memberentry.pl b/memberentry.pl
index ab85b8a50c..2fcf7fad0c 100755
--- a/memberentry.pl
+++ b/memberentry.pl
@@ -80,6 +80,7 @@ if ($delete){
 	my $ethcatpopup;
 	if ($ethnicitycategoriescount>=0) {
 		$ethcatpopup = CGI::popup_menu(-name=>'ethnicity',
+					-id => 'ethnicity',
 					-values=>$categories,
 					-default=>$data->{'ethnicity'},
 					-labels=>$labels);
@@ -88,6 +89,7 @@ if ($delete){
 
 	($categories,$labels)=borrowercategories();
 	my $catcodepopup = CGI::popup_menu(-name=>'categorycode',
+					-id => 'categorycode',
 					-values=>$categories,
 					-default=>$data->{'categorycode'},
 					-labels=>$labels);
@@ -142,6 +144,7 @@ if ($delete){
 		$select_branches{$branch} = $branches->{$branch}->{'branchname'};
 	}
 	my $CGIbranch=CGI::scrolling_list( -name     => 'branchcode',
+				-id => 'branchcode',
 				-values   => \@select_branch,
 				-default  => $data->{'branchcode'},
 				-labels   => \%select_branches,
-- 
2.39.5