Better error reporting.

git-svn-id: https://samskivert.googlecode.com/svn/trunk@620 6335cc39-0255-0410-8fd6-9bcaacd3b74c

projects/robodj/bin/setid3

@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 #
-# $Id: setid3,v 1.2 2002/03/03 05:46:54 mdb Exp $
+# $Id: setid3,v 1.3 2002/03/03 05:54:33 mdb Exp $
 #
 # A script for setting the id3 tags of the MP3 files in the RoboDJ
 # repository. The data from the database must be dumped into two files:
@@ -50,7 +50,7 @@ while (<SONGS>) {
                "--artist", "$artist",
                "--album", "$album",
                "--track", "$position", "$location");
-    warn "\nFailed to set tag on $songid\n" unless (system(@cmd) == 0);
+    warn "\nFailed to set tag on $location\n" unless (system(@cmd) == 0);
 
     if ($counter++ % 100 == 99) {
 	print ".";