[Koha-patches] [PATCH] [SIGNED-OFF] Bug 6218: patron gets dot added if no first name

[Frédéric Demians]

From: conan (aka Fernando Canizo) <conan at lugmen.org.ar>

Trivial fix, now it choose surname if firstname is empty and behaves
like before (firstname.surname) if both are provided.

[2011.05.12] F. Demians. Works as described.

Signed-off-by: Frédéric Demians <f.demians at tamil.fr>
---
 C4/Members.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/C4/Members.pm b/C4/Members.pm
index a151e03..e03b40b 100644
--- a/C4/Members.pm
+++ b/C4/Members.pm
@@ -842,7 +842,7 @@ sub Generate_Userid {
   do {
     $firstname =~ s/[[:digit:][:space:][:blank:][:punct:][:cntrl:]]//g;
     $surname =~ s/[[:digit:][:space:][:blank:][:punct:][:cntrl:]]//g;
-    $newuid = lc("$firstname.$surname");
+    $newuid = lc(($firstname)? "$firstname.$surname" : $surname);
     $newuid .= $offset unless $offset == 0;
     $offset++;
 
-- 
1.7.4