From fb14193b0195710b6d3d57342be3db3a77847f19 Mon Sep 17 00:00:00 2001 From: Garry Collum Date: Sat, 3 Jul 2010 09:14:59 -0400 Subject: [PATCH] Bug 2725: Fixes uppercasesurnames preference. Content-Type: text/plain; charset="utf-8" --- members/memberentry.pl | 5 +++++ 1 files changed, 5 insertions(+), 0 deletions(-) diff --git a/members/memberentry.pl b/members/memberentry.pl index 5cb4d72..c121460 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -246,6 +246,11 @@ if ($op eq 'save' || $op eq 'insert'){ $template->param('ERROR_age_limitations' => "$low to $high"); } } + + if(C4::Context->preference('uppercasesurnames')) { + $newdata{'surname'} = uc($newdata{'surname'}); + } + if (C4::Context->preference("IndependantBranches")) { if ($userenv && $userenv->{flags} % 2 != 1){ $debug and print STDERR " $newdata{'branchcode'} : ".$userenv->{flags}.":".$userenv->{branch}; -- 1.5.6.5