Index: branches/pap/tools/gpc1_find_images.pl
===================================================================
--- branches/pap/tools/gpc1_find_images.pl	(revision 27708)
+++ branches/pap/tools/gpc1_find_images.pl	(revision 28003)
@@ -240,4 +240,5 @@
     @scan = ();
     if (exists($opt{R})||exists($opt{B})) {
+#	print STDERR "$exp_workdir $exp_name\n";
 	open(NLS,"neb-ls $exp_workdir/${exp_name}/ |") || die "can't neb-ls";
 	while (<NLS>) {