From 46c2ff98049932326f6bb4d7f08ee1aa5e52e0f8 Mon Sep 17 00:00:00 2001 From: tonnesen Date: Thu, 27 Jun 2002 21:16:20 +0000 Subject: [PATCH] Merged in optional ethnicity fix from rel-1-2 --- moremember.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/moremember.pl b/moremember.pl index 63f533f112..04b7031c6b 100755 --- a/moremember.pl +++ b/moremember.pl @@ -66,6 +66,10 @@ if ($data->{'categorycode'} eq 'C'){ $data->{'phone'}=$data2->{'phone'}; $data->{'phoneday'}=$data2->{'phoneday'}; } +my $ethnicityline=''; +if ($data->{'ethnicity'} || $data->{'ethnotes'}) { + $ethnicityline="Ethnicity: $data->{'ethnicity'}, $data->{'ethnotes'}
"; +} print <{'streetaddress'}, $data->{'city'}
Home Address: $data->{'physstreet'}, $data->{'streetcity'}
@@ -80,7 +84,7 @@ Area: $data->{'area'}
Fee:$30/year, Paid
Joined: $data->{'dateenrolled'}, Expires: $data->{'expiry'}
Joining Branch: $data->{'homebranch'}

-Ethnicity: $data->{'ethnicity'}, $data->{'ethnotes'}
+$ethnicityline DoB: $data->{'dateofbirth'}
Sex: $data->{'sex'}

-- 2.39.2