Hi all,

I've added a line to the scripts. That should help:

sub read_cache {
    my $file    = shift;
    my $config  = shift;
    my $globals = {};

    %{$config} = ();
    ## read the cache file ignoring anything on the command-line.
    if (-e $file) {
  my %saved = %opt;
  %opt   = ();
  $saved_cache = _read_config($config, $globals, "##\\s*$program-$version\\s*", 
$file);
  %opt   = %saved;

  foreach my $h (keys %cache) {
      if (exists $config{$h}) {
    foreach (qw(atime mtime wtime ip status)) {
            $config{$h}{$_} = $cache{$h}{$_} if exists $cache{$h}{$_};
######### New line:
            $config{$h}{$_} = $saved{$_} if exists $saved{$_};
    }
      }
  }
    }
}



Regards

       Stefan





-- 
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]

Reply via email to