X-Git-Url: http://erislabs.net/gitweb/?p=id3fs.git;a=blobdiff_plain;f=bin%2Fid3fs-tag;fp=bin%2Fid3fs-tag;h=037dc783ba35c35e522a2a0b575833fe96cbff3f;hp=9b36c214e20c77f155e4acb19687b964bd892415;hb=2e2bea5f5b0be123366bce2ea8864c64840ed740;hpb=261cfc3301a9908e34ef38f3f0792b08a4412ff7

diff --git a/bin/id3fs-tag b/bin/id3fs-tag
index 9b36c21..037dc78 100755
--- a/bin/id3fs-tag
+++ b/bin/id3fs-tag
@@ -97,10 +97,11 @@ sub do_deletes
 	$file->delete_tags($replace_tags[0]);
     }
 
-    return($delete_artist   || $delete_album  || $delete_track   ||
-	   $delete_tracknum || $delete_year   || $delete_v1genre ||
-	   $delete_comment  || $delete_all    || $delete_genre   ||
-	   $delete_tags     || (@replace_tags && $replace_tags[0]));
+    my $donesomething=($delete_artist || $delete_album || $delete_track    ||
+		       $delete_tracknum || $delete_year || $delete_v1genre ||
+		       $delete_comment || $delete_all || $delete_genre     ||
+		       $delete_tags || (@replace_tags && $replace_tags[0]));
+    return($donesomething ? 1 : 0);
 }
 
 sub do_adds
@@ -120,11 +121,13 @@ sub do_adds
 	$file->add_tags($replace_tags[1]);
     }
 
-    return(defined($artist)   || defined($album) || defined($track)    ||
-	   defined($tracknum) || defined($year)  || defined($v1genre)  ||
-	   defined($comment)  || defined($genre) || defined($add_tags) ||
-	   (@replace_tags && defined($replace_tags[1])));
-
+    my $donesomething=(defined($artist)   || defined($album) ||
+		       defined($track)    || defined($tracknum) ||
+		       defined($year)     || defined($v1genre) ||
+		       defined($comment)  || defined($genre) ||
+		       defined($add_tags) ||
+		       (@replace_tags && defined($replace_tags[1])));
+    return( $donesomething ? 1 : 0 );
 }
 
 sub do_write
@@ -144,6 +147,9 @@ sub do_display
     my $comment=$file->comment();
     my $v1genre=$file->v1genre();
     my @tags=$file->tags();
+    @tags = map { (ref($_) eq "ARRAY") ? join('/', grep {defined;} @{$_}) : $_; } @tags;
+    use Data::Dumper;
+    print Dumper \@tags;
     if($verbose)
     {
 	print $file->path(), ":\n";