fix for genre ' ' not ignored in 'has no genre' filter

squentin · Jul 26, 2010 · ded7437 · ded7437
1 parent 400f618
commit ded7437
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/gmusicbrowser_tags.pm b/gmusicbrowser_tags.pm
@@ -144,7 +144,9 @@ sub SetTags
 		tr/\x1D\x00//d for @$tag;
 		if ($n==::SONG_GENRE)
 		{	my %genres;
-			$genres{ucfirst $_}=undef for grep $_ ne '', @$tag;
+			@$tag= grep $_ ne '', @$tag;
+			next unless @$tag;
+			$genres{ucfirst $_}=undef for @$tag;
 			$$aref[$n]=join("\x00",sort keys %genres)."\x00";
 			next;
 		}