From 16beedc9ee732c588a2ae9ade21c75f11ff9a0b8 Mon Sep 17 00:00:00 2001
From: root <root@ceoi01.(none)>
Date: Tue, 30 Jun 2015 13:08:38 +0200
Subject: [PATCH] MO-P: Contestants can have multiple first names

---
 mop/admin/mo-cms-users.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mop/admin/mo-cms-users.pl b/mop/admin/mo-cms-users.pl
index b6558b1..45f2cf1 100644
--- a/mop/admin/mo-cms-users.pl
+++ b/mop/admin/mo-cms-users.pl
@@ -55,7 +55,7 @@ while (<$logins>) {
 	s[^\\user\{][] or next;
 	s[}$][] or die;
 	my ($login, $passwd) = split /}{/;
-	my ($fn, $ln) = split /\s+/, $fullname{$login};
+	my ($fn, $ln) = $fullname{$login} =~ m{^(.*)\s+(.*)} or die;	# Handles correctly multiple first names
 	my $ip = $machine{$login};
 	print "cmsAddUser -c $contest_id -p '$passwd'",
 		($bind_to_ip && $ip ? " -i $ip" : ""),
-- 
2.39.2