9032a7c276af3a119b67464b7804fec06be032d2
4 require_once dirname(__FILE__
) . '/connect.db.inc.php';
5 require_once 'validations.inc.php';
9 $opt = getopt('p:o:h');
11 if(empty($opt['p']) ||
empty($opt['o']) ||
isset($opt['h'])) {
13 usage: lists.create_promo.php -p promo -o owner
14 create mailing list for promo "promo" with initial owner "owner"
20 // Retrieves list parameters.
21 $promo = intval($opt['p']);
24 $owner_user = User
::getSilent($owner);
26 echo "Supplied owner is not valid, aborting.\n";
31 $req = new ListeReq($owner_user, false
, "promo$promo", $globals->mail
->domain
, "Liste de la promotion $promo",
32 1 /*private*/, 2 /*moderate*/, 0 /*free subscription*/,
33 array($owner), array());
35 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: