Merge branch 'platal-0.9.17'

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

diff --git a/bin/lists.create_promo.php b/bin/lists.create_promo.php
index f7bc204..34eb213 100755 (executable)
--- a/bin/lists.create_promo.php
+++ b/bin/lists.create_promo.php
@@ -1,8 +1,11 @@
-#!/usr/bin/php4 -q
+#!/usr/bin/php5 -q
 <?php
-require_once("xorg.inc.php");
+
+require_once(dirname(__FILE__) . '/connect.db.inc.php');
 require_once('validations.inc.php');
 
+global $globals;
+
 $opt = getopt('p:o:h');
 
 if(empty($opt['p']) || empty($opt['o']) || isset($opt['h'])) {
@@ -17,8 +20,9 @@ EOF;
 $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());
+$req = new ListeReq(0, 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:
 ?>