From: Marius Gavrilescu <marius@ieval.ro>
Date: Sat, 9 May 2015 07:38:57 +0000 (+0300)
Subject: Clean up method calls
X-Git-Tag: 0.001~2
X-Git-Url: http://git.ieval.ro/?p=music-tag-coveralia.git;a=commitdiff_plain;h=280c03573e7da516a5457a8a3706b0096fd27f64

Clean up method calls
---

diff --git a/lib/Music/Tag/Coveralia.pm b/lib/Music/Tag/Coveralia.pm
index fe2e9c6..34ae9e1 100644
--- a/lib/Music/Tag/Coveralia.pm
+++ b/lib/Music/Tag/Coveralia.pm
@@ -18,18 +18,18 @@ my $ht = HTTP::Tiny->new(agent => "Music-Tag-Coveralia/$VERSION");
 sub get_tag {
 	my ($self) = @_;
 
-	my $album = $self->info->get_data('album');
+	my $album = $self->info->album;
 	my $ws = WWW::Search->new('Coveralia::Albums');
 	$self->status(1, "Searching coveralia for the album $album");
 	$ws->native_query(WWW::Search::escape_query($album));
 	while (my $res = $ws->next_result) {
 		$self->status(1, 'Found album ' . $res->title . ' by ' . $res->artist);
-		next if $self->info->has_data('artist') && $self->info->get_data('artist') ne $res->artist;
+		next if $self->info->has_data('artist') && $self->info->artist ne $res->artist;
 		$self->status(0, 'Selected album ' . $res->title . ' by ' . $res->artist);
 		if ($res->cover('frontal')) {
 			my $resp = $ht->get($res->cover('frontal'));
 			last unless $resp->{success};
-			$self->info->set_data(picture => {_Data => $resp->{content}});
+			$self->info->picture({_Data => $resp->{content}});
 			$self->tagchange('picture');
 		}
 		last