Changeset 368
- Timestamp:
- 03/08/06 11:00:27
- Files:
-
- trunk/plagger/lib/Plagger/Cache.pm (modified) (1 diff)
- trunk/plagger/lib/Plagger/CacheProxy.pm (modified) (1 diff)
- trunk/plagger/lib/Plagger/Plugin/CustomFeed/iTunesRecentPlay.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Cache.pm
r279 r368 29 29 cache => $conf->{class}->new($conf->{params}), 30 30 }, $class; 31 } 32 33 sub path_to { 34 my($self, @path) = @_; 35 File::Spec->catfile($self->{base}, @path); 31 36 } 32 37 trunk/plagger/lib/Plagger/CacheProxy.pm
r231 r368 20 20 } 21 21 22 sub path_to { 23 my($self, @path) = @_; 24 $self->{cache}->path_to($self->{namespace}, @path); 25 } 26 22 27 sub cookie_jar { 23 28 my $self = shift; trunk/plagger/lib/Plagger/Plugin/CustomFeed/iTunesRecentPlay.pm
r366 r368 40 40 return; 41 41 } 42 } 43 44 my $uri = URI->new($file); 45 if ($uri->scheme) { 46 $file = $self->cache->path_to('iTunes Music Library.xml'); 47 48 my $ua = Plagger::UserAgent->new; 49 my $response = $ua->mirror($uri => $file); 50 if ($response->is_error) { 51 $context->log(error => "GET $uri failed: " . $response->status_line); 52 return; 53 } 54 55 $context->log(info => "Downloaded $uri to $file"); 42 56 } 43 57
