87 |
|
my $self=shift; |
88 |
|
|
89 |
|
my ($url, $file)=$self->{urlhandler}->get($self->url()); |
90 |
+ |
$self->verbose("Getting file ".$self->url()." = $file"); |
91 |
|
return $file; |
92 |
|
} |
93 |
|
|
128 |
|
if ( $rv != 0 ) { |
129 |
|
$self->verbose(" Need to Update ".$self->url()); |
130 |
|
# ---- sort out the preprocessed file in the cache |
131 |
< |
my $newfile=$self->config()->cache()-> |
131 |
< |
filename($outfile); |
131 |
> |
my $newfile=$self->config()->cache()->filename($outfile); |
132 |
|
$self->config()->cache()->store($outfile,$newfile); |
133 |
|
|
134 |
|
$self->process($self->config()->cache()->file($self->url()),$newfile); |