X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=bin%2Flists.create_promo.php;h=78accf9d852ca5524e3eaaec3d8e8cea0361fdbc;hb=12ddbc2037b16496dfb9d91c4f7091850146fcde;hp=f7bc204e453c25c4198d1674e0f6e8a689f9da45;hpb=dee5534464ef8120156d55f11a0352eff5bf8afa;p=platal.git

diff --git a/bin/lists.create_promo.php b/bin/lists.create_promo.php
index f7bc204..78accf9 100755
--- a/bin/lists.create_promo.php
+++ b/bin/lists.create_promo.php
@@ -1,7 +1,9 @@
-#!/usr/bin/php4 -q
+#!/usr/bin/php5 -q
 <?php
-require_once("xorg.inc.php");
-require_once('validations.inc.php');
+
+require_once dirname(__FILE__) . '/connect.db.inc.php';
+
+global $globals;
 
 $opt = getopt('p:o:h');
 
@@ -14,11 +16,20 @@ EOF;
     exit;
 }
 
+// Retrieves list parameters.
 $promo = intval($opt['p']);
 $owner = $opt['o'];
 
-$req = new ListeReq(0, "promo$promo", "Liste de la promotion $promo",
-		1 /*private*/, 2 /*moderate*/, 0 /*free subscription*/,
-		array($owner), array());
+$owner_user = User::getSilent($owner);
+if (!$owner_user) {
+    echo "Supplied owner is not valid, aborting.\n";
+    exit(1);
+}
+
+// Creates the list.
+$req = new ListeReq($owner_user, false, "promo$promo", $globals->mail->domain, "Liste de la promotion $promo",
+                    1 /*private*/, 2 /*moderate*/, 0 /*free subscription*/,
+                    array($owner), array());
 $req->submit();
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 ?>