| # | Line 219 | Line 219 | sub restore { | |
|---|---|---|
| 219 | # -- recreate the cache | |
| 220 | my $cacheinfo=<$fh>; | |
| 221 | chomp $cacheinfo; | |
| 222 | < | my ($type,$location)=split /:::/, $cacheinfo; |
| 223 | < | my $cache=$type->new($location); |
| 222 | > | my ($type,$cachelocation)=split /:::/, $cacheinfo; |
| 223 | > | my $cache=$type->new($cachelocation); |
| 224 | $self->cache($cache); | |
| 225 | ||
| 226 | my $url=<$fh>; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |