diff options
Diffstat (limited to 'pcr/gmusicbrowser/perl524.patch')
| -rw-r--r-- | pcr/gmusicbrowser/perl524.patch | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/pcr/gmusicbrowser/perl524.patch b/pcr/gmusicbrowser/perl524.patch new file mode 100644 index 000000000..0bbf388cd --- /dev/null +++ b/pcr/gmusicbrowser/perl524.patch @@ -0,0 +1,24 @@ +diff -ruN gmusicbrowser-1.1.15.ORIG/gmusicbrowser_list.pm gmusicbrowser-1.1.15/gmusicbrowser_list.pm +--- gmusicbrowser-1.1.15.ORIG/gmusicbrowser_list.pm 2015-08-20 01:47:16.000000000 +0200 ++++ gmusicbrowser-1.1.15/gmusicbrowser_list.pm 2016-06-06 18:31:36.650112015 +0200 +@@ -7998,7 +7998,7 @@ + unless ($notnow) + { #warn "$key ---found in ($code,@deps)\n"; + if (ref $code) +- { my ($func,my @keys)=@$code; #warn " -> ($func, @keys)\n"; ++ { my ($func, @keys)=@$code; #warn " -> ($func, @keys)\n"; + my $out=join ',',map "'$_'", @keys; + my $in= join ',',map "'$_'", @deps; $in=~s#\?##g; + $out= @keys>1 ? "\@var{$out}" : "\$var{$out}"; +diff -ruN gmusicbrowser-1.1.15.ORIG/gmusicbrowser.pl gmusicbrowser-1.1.15/gmusicbrowser.pl +--- gmusicbrowser-1.1.15.ORIG/gmusicbrowser.pl 2015-08-20 01:47:16.000000000 +0200 ++++ gmusicbrowser-1.1.15/gmusicbrowser.pl 2016-06-06 18:31:16.760550402 +0200 +@@ -8977,7 +8977,7 @@ + + ($cmd,my $pattern)= split /:/,$cmd,2; + $pattern='' unless defined $pattern; +- my ($basecmd,my $prop)= Songs::filter_properties($field,"$cmd:$pattern"); ++ my ($basecmd, $prop)= Songs::filter_properties($field,"$cmd:$pattern"); + if (!$prop) + { $cmd= Songs::Field_property($field,'default_filter'); + ($basecmd,$prop)= Songs::filter_properties($field,$cmd); |