@@ -, +, @@
of birth
---
koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember.tt | 2 +-
members/moremember.pl | 6 ++++++
2 files changed, 7 insertions(+), 1 deletion(-)
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember.tt
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember.tt
@@ -225,7 +225,7 @@ function validate1(date) {
[% IF ( emailpro ) %]
Secondary email: [% emailpro %][% END %]
[% END %]
[% IF ( initials ) %]Initials: [% initials %][% END %]
- [% IF ( dateofbirth ) %]Date of birth:[% dateofbirth | $KohaDates %][% END %]
+ [% IF ( dateofbirth ) %]Date of birth:[% dateofbirth | $KohaDates %] ([% age %])[% END %]
[% IF ( sex ) %]Gender:
[% IF ( sex == 'F' ) %]Female[% ELSIF ( sex == 'M' ) %]Male[% ELSE %][% sex %][% END %]
[% END %][% END %]
--- a/members/moremember.pl
+++ a/members/moremember.pl
@@ -139,6 +139,12 @@ foreach (qw(dateenrolled dateexpiry dateofbirth)) {
}
$data->{'IS_ADULT'} = ( $data->{'categorycode'} ne 'I' );
+my @age;
+my ($years, $months) = GetAge($data->{dateofbirth});
+push @age, "$years year(s)" if $years;
+push @age, "$months month(s)" if $months;
+$template->param( age => join(', ', @age) );
+
for (qw(gonenoaddress lost borrowernotes)) {
$data->{$_} and $template->param(flagged => 1) and last;
}
--