gforge-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gforge-commits] gforge/cronjobs/mail mailing_lists_create.php, 1.9, 1.


From: gsmet
Subject: [Gforge-commits] gforge/cronjobs/mail mailing_lists_create.php, 1.9, 1.10
Date: Wed, 31 Mar 2004 11:11:04 -0600

Update of /cvsroot/gforge/gforge/cronjobs/mail
In directory db.perdue.net:/tmp/cvs-serv28854/cronjobs/mail

Modified Files:
        mailing_lists_create.php 
Log Message:
* fixed some localization problems
* fixed french translation
* fixed ML creation cronjob
* updated ML UI


Index: mailing_lists_create.php
===================================================================
RCS file: /cvsroot/gforge/gforge/cronjobs/mail/mailing_lists_create.php,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- mailing_lists_create.php    26 Mar 2004 17:15:54 -0000      1.9
+++ mailing_lists_create.php    31 Mar 2004 17:11:01 -0000      1.10
@@ -6,9 +6,6 @@
 //     and, finally, create the lists in a /tmp/mailman-aliases file
 //     The /tmp/mailman-aliases file will then be read by the mailaliases.php 
file
 //
-//      Status: 1 - list creating request 
-//      Status: 2 - list created
-//      
 //     DEFINE VARS FOR USING THIS SCRIPT
 //
 define('MAILMAN_DIR','/var/mailman/');
@@ -44,7 +41,7 @@
         mail_group_list.group_list_id 
        FROM mail_group_list,users
         WHERE mail_group_list.list_admin=users.user_id
-        AND mail_group_list.status = 1
+        AND mail_group_list.status = ".MAIL__MAILING_LIST_IS_REQUESTED."
         ");
 $err .= db_error();
 
@@ -53,6 +50,8 @@
 
 $h1 = fopen("/tmp/mailman-aliases","w");
 
+$mailingListIds = array();
+
 for ($i=0; $i<$rows; $i++) {
        $err .= "Processing row $i\n";
        $listadmin = db_result($res,$i,'user_name');
@@ -66,16 +65,23 @@
                $lcreate_cmd = MAILMAN_DIR."bin/newlist -q $listname $email 
$listpassword";
                $err .= "Command to be executed is $lcreate_cmd\n";
                $fp = popen($lcreate_cmd,"r");
-
-               
+               pclose($fp);
        }
        
-       // Update status
-       db_query("UPDATE mail_group_list set status=2 where group_list_id = 
$grouplistid");
+       $mailingListIds[] = $grouplistid;
 
-       $list_str="$listname:       \"|/var/mailman/mail/wrapper post 
$listname\"
-$listname-admin: \"|/var/mailman/mail/wrapper mailowner $listname\"
-$listname-request: \"|/var/mailman/mail/wrapper mailcmd $listname\"\n";
+       $list_str =
+$listname.':              "|'.MAILMAN_DIR.'mail/mailman post 
'.$listname.'"'."\n"
+.$listname.'-admin:        "|'.MAILMAN_DIR.'mail/mailman admin 
'.$listname.'"'."\n"
+.$listname.'-bounces:      "|'.MAILMAN_DIR.'mail/mailman bounces 
'.$listname.'"'."\n"
+.$listname.'-confirm:      "|'.MAILMAN_DIR.'mail/mailman confirm 
'.$listname.'"'."\n"
+.$listname.'-join:         "|'.MAILMAN_DIR.'mail/mailman join 
'.$listname.'"'."\n"
+.$listname.'-leave:        "|'.MAILMAN_DIR.'mail/mailman leave 
'.$listname.'"'."\n"
+.$listname.'-owner:        "|'.MAILMAN_DIR.'mail/mailman owner 
'.$listname.'"'."\n"
+.$listname.'-request:      "|'.MAILMAN_DIR.'mail/mailman request 
'.$listname.'"'."\n"
+.$listname.'-subscribe:    "|'.MAILMAN_DIR.'mail/mailman subscribe 
'.$listname.'"'."\n"
+.$listname.'-unsubscribe:  "|'.MAILMAN_DIR.'mail/mailman unsubscribe 
'.$listname.'"'."\n"
+;
 
        fwrite($h1,$list_str);
 //
@@ -99,6 +105,9 @@
 */
 }
 
+// Update status
+db_query('UPDATE mail_group_list set status='.MAIL__MAILING_LIST_IS_CREATED.' 
where group_list_id IN('.implode(',', $mailingListIds).')');
+
 fclose($h1);
 
 cron_entry(18,$err);





reply via email to

[Prev in Thread] Current Thread [Next in Thread]