From 65e2f61319b5137b127e1bc3648650eb220f9186 Mon Sep 17 00:00:00 2001
From: Mercier Pierre-Olivier <nemunaire@acu.epita.fr>
Date: Sun, 15 Dec 2013 18:31:46 +0100
Subject: [PATCH] Fix connection to gearman server

---
 process/exec/guantanamo.pl      | 2 +-
 process/projects/gen_grading.pl | 2 +-
 process/projects/get_csv.pl     | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/process/exec/guantanamo.pl b/process/exec/guantanamo.pl
index 706def8..b40da88 100644
--- a/process/exec/guantanamo.pl
+++ b/process/exec/guantanamo.pl
@@ -196,5 +196,5 @@ sub process_master
 
 log INFO, "Starting guantanamo.pl as master process";
 
-Process::add_server("gearman:4730");
+Process::add_server("gearmand:4730");
 Process::register("guantanamo", \&process_master);
diff --git a/process/projects/gen_grading.pl b/process/projects/gen_grading.pl
index 9b91ff5..0236b68 100644
--- a/process/projects/gen_grading.pl
+++ b/process/projects/gen_grading.pl
@@ -97,5 +97,5 @@ sub process
     return $grade->toString;
 }
 
-Process::add_server("gearman:4730");
+Process::set_servers("gearmand:4730");
 Process::register_no_parse("gen_grading", \&process);
diff --git a/process/projects/get_csv.pl b/process/projects/get_csv.pl
index cc32ab3..eb1f0f2 100644
--- a/process/projects/get_csv.pl
+++ b/process/projects/get_csv.pl
@@ -105,5 +105,5 @@ sub process
     return $out;
 }
 
-Process::set_servers("gearman:4730");
+Process::set_servers("gearmand:4730");
 Process::register_no_parse("get_csv", \&process);