diff -Naur -x '*~' sympa-6.0.2/src/lib/Conf.pm sympa-6.0.2-fix-created-directory-ownership//src/lib/Conf.pm
--- sympa-6.0.2/src/lib/Conf.pm	2010-01-13 17:31:43.000000000 +0100
+++ sympa-6.0.2-fix-created-directory-ownership//src/lib/Conf.pm	2010-05-29 12:11:01.000000000 +0200
@@ -787,18 +787,34 @@
 		do_log('err', 'Unable to create spool %s', $Conf{$qdir});
 		$config_err++;
 	    }
+            unless (&tools::set_file_rights(
+                    file  => $Conf{$qdir},
+                    user  => Sympa::Constants::USER,
+                    group => Sympa::Constants::GROUP,
+            )) {
+                &do_log('err','Unable to set rights on %s',$Conf{$qdir});
+		$config_err++;
+            }
 	}
     }
 
     ## Also create associated bad/ spools
-    foreach my $qdir ('queue','queuedistribute','queueautomatic')
-    {
-	unless (-d $Conf{$qdir}.'/bad') {
-	    do_log('info', "creating spool $Conf{$qdir}/bad");
-	    unless ( mkdir ($Conf{$qdir}.'/bad', 0775)) {
-		do_log('err', 'Unable to create spool %s', $Conf{$qdir}.'/bad');
+    foreach my $qdir ('queue','queuedistribute','queueautomatic') {
+        my $subdir = $Conf{$qdir}.'/bad';
+	unless (-d $subdir) {
+	    do_log('info', "creating spool $subdir");
+	    unless ( mkdir ($subdir, 0775)) {
+		do_log('err', 'Unable to create spool %s', $subdir);
 		$config_err++;
 	    }
+            unless (&tools::set_file_rights(
+                    file  => $subdir,
+                    user  => Sympa::Constants::USER,
+                    group => Sympa::Constants::GROUP,
+            )) {
+                &do_log('err','Unable to set rights on %s',$subdir);
+		$config_err++;
+            }
 	}
     }