diff --git a/everything.stor b/everything.stor
index 8f67f85..b213995 100644
Binary files a/everything.stor and b/everything.stor differ
diff --git a/modcache.stor b/modcache.stor
index 3a59426..38d7ba9 100644
Binary files a/modcache.stor and b/modcache.stor differ
diff --git a/progress2.pl b/progress2.pl
index 59fff33..8b5b9a4 100755
--- a/progress2.pl
+++ b/progress2.pl
@@ -15,7 +15,7 @@ my $cache = retrieve $ARGV[0];
 
 my $first_count =()= grep {exists $cache->{jobstatus}{$_}{tested}} keys $cache->{jobstatus}->%*;
 
-my $dists = 0+$cache->{modules}->@*;
+my $dists =()= $cache->{modules}->@*;
 
 while (1) {
   sleep(2);
@@ -25,7 +25,7 @@ while (1) {
 
   my $rate = ($count-$first_count)/(time()-$start_time);
   my $tocomplete = ($rate == 0? sub{-1} : sub{($dists-$count)/$rate})->();
-  my $final_dt = $start_dt->clone()->add(seconds => $tocomplete);
+  my $final_dt = DateTime->now(time_zone => 'America/Los_Angeles')->add(seconds => $tocomplete);
   printf "%d/%d [%02.2f%%] %0.2f/min %s %0.2f\n", $count, $dists, 100*$count/$dists, $rate*60, $final_dt->iso8601, $tocomplete;
  
 };