blob: 92593a8db76ac8d074c422abf7b92977661da069 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
Description: Fix the musicbrainz plugin
Origin: upstream, http://forums.gcstar.org/viewtopic.php?id=3490
--- gcstar-1.7.0.orig/lib/gcstar/GCPlugins/GCmusics/GCMusicBrainz.pm
+++ gcstar-1.7.0/lib/gcstar/GCPlugins/GCmusics/GCMusicBrainz.pm
@@ -234,7 +234,7 @@ use GCPlugins::GCmusics::GCmusicsCommon;
my ($self, $word) = @_;
my $key = ($self->{searchField} eq 'artist') ? 'artist' : 'title';
- return "http://musicbrainz.org/ws/1/release/?type=xml&$key=$word";
+ return "http://musicbrainz.org/ws/1/release/?fmt=xml&$key=$word";
}
sub getItemUrl
@@ -247,8 +247,8 @@ use GCPlugins::GCmusics::GCmusicsCommon;
sub changeUrl
{
my ($self, $url) = @_;
- $url =~ s|http://musicbrainz.org/album/(.*?)\.html|http://musicbrainz.org/ws/1/release/$1?type=xml&inc=artist+tracks+release-events+artist-rels+url-rels+ratings+labels+tags|;
- $url =~ s|http://musicbrainz.org/release/(.*?)\.html|http://musicbrainz.org/ws/1/release/$1?type=xml&inc=artist+tracks+release-events+artist-rels+url-rels+ratings+labels+tags|;
+ $url =~ s|http://musicbrainz.org/album/(.*?)\.html|http://musicbrainz.org/ws/1/release/$1?fmt=xml&inc=artist+tracks+release-events+artist-rels+url-rels+ratings+labels+tags|;
+ $url =~ s|http://musicbrainz.org/release/(.*?)\.html|http://musicbrainz.org/ws/1/release/$1?fmt=xml&inc=artist+tracks+release-events+artist-rels+url-rels+ratings+labels+tags|;
return $url;
}
|