Changeset 1879 for alternc/trunk/bureau/class/m_mail.php

Timestamp:

08/23/07 10:18:41 (6 years ago)

Author:

benjamin

Message:

we copy the default squirrelmail prefs in new accounts. Fixes #1015

File:

• alternc/trunk/bureau/class/m_mail.php (modified) (1 diff)

alternc/trunk/bureau/class/m_mail.php

@@ -535 +535 @@
 
     $f=fopen("/var/lib/squirrelmail/data/".$mail."_".$dom.".pref","wb");
+    $g=0; $g=@fopen("/etc/squirrelmail/default_pref","rb");
     fputs($f,"email_address=$mail@$dom\nchosen_theme=default_theme.php\n");
+    if ($g) {
+      while ($s=fgets($g,1024)) {
+        if (substr($s,0,14)!="email_address=" && substr($s,0,13)!="chosen_theme=") {
+          fputs($f,$s);
+        }
+      }
+      fclose($g);
+    }
     fclose($f);
-    $f=fopen("/var/lib/squirrelmail/data/".$mail."@".$dom.".pref","wb");
-    fputs($f,"email_address=$mail@$dom\nchosen_theme=default_theme.php\n");
-    fclose($f);
+    @copy("/var/lib/squirrelmail/data/".$mail."_".$dom.".pref","/var/lib/squirrelmail/data/".$mail."@".$dom.".pref");
     exec("/usr/lib/alternc/mail_add ".$mail."_".$dom." ".$cuid);
     return true;