X-Git-Url: http://erislabs.net/gitweb/?p=id3fs.git;a=blobdiff_plain;f=bin%2Fid3fs-tag;h=c79a5b3c8482e14bb0f142800913afcbf7c6d0da;hp=42650c3ea86658eb082b63086d9444ca23d9c641;hb=08717313d5feba3f77f848b6409ec46263ed548e;hpb=19d8ec06b9d280881f8065abe8bd7d8db28f5eb8

diff --git a/bin/id3fs-tag b/bin/id3fs-tag
index 42650c3..c79a5b3 100755
--- a/bin/id3fs-tag
+++ b/bin/id3fs-tag
@@ -151,18 +151,16 @@ sub do_display
     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";
-	print "tracknum: $tracknum\n" if($tracknum);
-	print "artist: $artist\n"     if($artist);
-	print "album: $album\n"       if($album);
-	print "song: $track\n"        if($track);
-	print "year: $year\n"         if($year);
-	print "v1genre: $v1genre\n"   if($v1genre);
-	print "comment: $comment\n"   if($comment);
+	print "  tracknum: $tracknum\n" if($tracknum);
+	print "  artist: $artist\n"     if($artist);
+	print "  album: $album\n"       if($album);
+	print "  song: $track\n"        if($track);
+	print "  year: $year\n"         if($year);
+	print "  v1genre: $v1genre\n"   if($v1genre);
+	print "  comment: $comment\n"   if($comment);
     }
     else
     {
@@ -170,10 +168,12 @@ sub do_display
 		    $year, $v1genre, $comment);
 	@fields=map { defined($_) ? $_ : ""; } @fields;
 	print join(':', @fields), "\n";
-	if(@tags)
-	{
-	    print "tags:", join(", ", @tags), "\n";
-	}
+    }
+    if(@tags)
+    {
+	if($verbose) { print "  tags: "; }
+	else         { print $file->path() . ":tags:"; }
+	print join(", ", @tags), "\n";
     }
 }