[Koha-patches] [PATCH] Bug 2725: Fixes uppercasesurnames preference.

[Garry Collum]

---
 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