# HG changeset patch
# User romaingred
# Date 1508502875 14400
# Node ID 509d95c26dab84301d4fa5df8beb982c9f807c12
# Parent  39b039d82743cc8c4168f0111c21681691943186
Uploaded

diff -r 39b039d82743 -r 509d95c26dab bin/subgroups.pm
--- a/bin/subgroups.pm	Thu Oct 19 04:39:33 2017 -0400
+++ b/bin/subgroups.pm	Fri Oct 20 08:34:35 2017 -0400
@@ -16,6 +16,7 @@
 	my ($fin, $dir, $mis, $mis_TE, $proc, $tRNAs, $rRNAs, $snRNAs, $miRNAs, $exons, $TE, $min_si, $max_si, $min_pi, $max_pi, $report ) = @_;
 	my (@files, $sum, $pie, $repar, %ismapped, %isjunk, %repartition, @junk_ref, @all_ref );
 
+	srand();
 	print $report "----------------------------\n";
 	print $report "Create subgroups:\nfastq_in: $fin\ndirectory_out: $dir\nmismatches: $mis\nmismatches TE: $mis_TE\n";