fix tempdir() bug for over 1000 calls

Change-Id: I6accb3ef32624dc7552e91d301a0090f2e51fa6e

diff --git a/depanneur b/depanneur
index fb7123a4ecbed264eb21483b6de5e36964518b47..9d33dbbb8752a870377c08e7dfd4d1ae7290863f 100755 (executable)
--- a/depanneur
+++ b/depanneur
@@ -2575,6 +2575,7 @@ if ($style eq 'git') {
         foreach my $pack (@data_queue) {
             my $pid = $pm->start($pack->{"filename"}) and next;
             my @packs_arr = ();
+            srand();
             @packs_arr = prepare_git($config, $pack->{"project_base_path"}, $pack->{"filename"},
                     $pack->{"packaging_dir"}, $pack->{"upstream_branch"}, $pack->{"upstream_tag"});
             $pm->finish(0, \@packs_arr);