d96a86aa9e8ab73fd3b81d878ecaa669a4cfb1be
bernd Neues Modul für Mailman-Ver...

bernd authored 15 years ago

1) <?php
2) 
3) require_once('mailman.php');
4) require_role(ROLE_SYSTEMUSER);
5) 
6) $title = "Neue Mailingliste erstellen";
7) $domains = get_mailman_domains();
8) 
bernd Mehr config-optionen und co...

bernd authored 15 years ago

9) $maildomains = array('0' => config('mailman_host'));
bernd Neues Modul für Mailman-Ver...

bernd authored 15 years ago

10) foreach ($domains AS $domain)
11) {
12)   $maildomains[$domain['id']] = $domain['fqdn'];
13) }
14) 
15) 
16) if ($_GET['action'] == 'new')
17) {
18)   $maildomain = $_POST['maildomain'];
19)   if ($maildomain == 0)
20)     $maildomain = NULL;
21)   else
22)     if (! isset($maildomains[$maildomain]))
23)       system_failure('Ihre Domain-Auswahl scheint ungültig zu sein');
24) 
25)   create_list($_POST['listname'], $maildomain, $_POST['admin']);
bernd Bugfix und Fehler-Status

bernd authored 15 years ago

26)   if (! $debugmode)
27)     header('Location: lists');