Moving to GitHub.

[platal.git] / bin / lists.create_promo.php

diff --git a/bin/lists.create_promo.php b/bin/lists.create_promo.php
index 35a1200..3222a42 100755 (executable)
--- a/bin/lists.create_promo.php
+++ b/bin/lists.create_promo.php
@@ -1,8 +1,7 @@
 #!/usr/bin/php5 -q
 <?php
 
-require_once(dirname(__FILE__) . '/connect.db.inc.php');
-require_once('validations.inc.php');
+require_once dirname(__FILE__) . '/connect.db.inc.php';
 
 global $globals;
 
@@ -24,13 +23,13 @@ $owner = $opt['o'];
 $owner_user = User::getSilent($owner);
 if (!$owner_user) {
     echo "Supplied owner is not valid, aborting.\n";
-    exit 1;
+    exit(1);
 }
 
 // Creates the list.
-$req = new ListeReq($owner_user, false, "promo$promo", $globals->mail->domain, "Liste de la promotion $promo",
+$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:
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
 ?>