[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha moremember.pl,1.11.2.1,1.11.2.2
From: |
Steve Tonnesen |
Subject: |
[Koha-cvs] CVS: koha moremember.pl,1.11.2.1,1.11.2.2 |
Date: |
Thu, 27 Jun 2002 14:06:36 -0700 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv17401
Modified Files:
Tag: rel-1-2
moremember.pl
Log Message:
Ethnicity line only shows up if ethnicity data has been entered for the
borrower.
Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.11.2.1
retrieving revision 1.11.2.2
diff -C2 -r1.11.2.1 -r1.11.2.2
*** moremember.pl 18 May 2002 10:21:51 -0000 1.11.2.1
--- moremember.pl 27 Jun 2002 21:06:34 -0000 1.11.2.2
***************
*** 67,70 ****
--- 67,74 ----
$data->{'phoneday'}=$data2->{'phoneday'};
}
+ my $ethnicityline='';
+ if ($data->{'ethnicity'} || $data->{'ethnotes'}) {
+ $ethnicityline="Ethnicity: $data->{'ethnicity'},
$data->{'ethnotes'}<br>";
+ }
print <<printend
Postal Address: $data->{'streetaddress'}, $data->{'city'}<BR>
***************
*** 81,85 ****
Joined: $data->{'dateenrolled'}, Expires: $data->{'expiry'} <BR>
Joining Branch: $data->{'homebranch'}<P>
! Ethnicity: $data->{'ethnicity'}, $data->{'ethnotes'}<BR>
DoB: $data->{'dateofbirth'}<BR>
Sex: $data->{'sex'}<P>
--- 85,89 ----
Joined: $data->{'dateenrolled'}, Expires: $data->{'expiry'} <BR>
Joining Branch: $data->{'homebranch'}<P>
! $ethnicityline
DoB: $data->{'dateofbirth'}<BR>
Sex: $data->{'sex'}<P>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha moremember.pl,1.11.2.1,1.11.2.2,
Steve Tonnesen <=