From 03ff10ba024ca5f8239f6d9b3ca51900b305817c Mon Sep 17 00:00:00 2001
From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Demians?= <f.demians@tamil.fr>
Date: Thu, 16 Sep 2010 08:37:38 -0400
Subject: [PATCH] Bug 5201 Patron surname dropped

Signed-off-by: Ian Walls <ian.walls@bywatersolutions.com>
Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
---
 members/memberentry.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/members/memberentry.pl b/members/memberentry.pl
index 6ec6d8e2ae..eacb2fff09 100755
--- a/members/memberentry.pl
+++ b/members/memberentry.pl
@@ -247,7 +247,7 @@ if ($op eq 'save' || $op eq 'insert'){
     }
   }
   
-    if(C4::Context->preference('uppercasesurnames')) {
+    if($newdata{surname} && C4::Context->preference('uppercasesurnames')) {
         $newdata{'surname'} = uc($newdata{'surname'});
     }
 
-- 
2.39.5