===================================================================
RCS file: /cvs/mp3/bin/createfulllist.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- mp3/bin/createfulllist.pl	2006/03/02 23:20:47	1.1
+++ mp3/bin/createfulllist.pl	2006/08/12 01:14:53	1.2
@@ -1,4 +1,5 @@
 #!/usr/bin/perl -w
+# $RedRiver$
 ########################################################################
 # showall.pl *** Displays all MP3's in all subdirs
 #
@@ -223,7 +224,7 @@
 #		$filename =~ s/%(..)/pack("c",hex($1))/ge;
 		chomp $filename;
 		print "Added $filename<br>\n";
-		open  PLAYLIST, ">>$list" or bail("unable to open PLAYLIST: $!");
+		open  PLAYLIST, ">>$list" or bail("unable to open PLAYLIST '$list': $!");
 		print PLAYLIST "$filename\n";
 		close PLAYLIST or bail("unable to close PLAYLIST: $!");
 	} else {