From b00660dae2e77257485c44264d59bea908a30ab5 Mon Sep 17 00:00:00 2001 From: Andreas Koenig Date: Tue, 3 Jul 2018 03:41:47 +0200 Subject: [PATCH] Need disk space --- bin/call-analoep.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bin/call-analoep.pl b/bin/call-analoep.pl index 21b7dc87..b1c65408 100644 --- a/bin/call-analoep.pl +++ b/bin/call-analoep.pl @@ -76,8 +76,8 @@ my @p = ( { k => 5, m => 80 }, { k => 4, m => 90 }, { k => 3, m => $days_for_three, f => 'tar' }, - { k => 2, m => 731 }, # as long as we have more than 2, we remove everything older ... - { k => 1, m => 1096 }, # as long as we have more than 1, we remove everything older ... + { k => 2, m => 1.75*$days_for_three }, # as long as we have more than 2, we remove everything older ... + { k => 1, m => 2.5*$days_for_three }, # as long as we have more than 1, we remove everything older ... ); PARAMCOMBI: for my $p (@p) { -- 2.11.4.GIT