--- a/uh_parser/RaptorError.pm	Mon May 10 12:03:05 2010 +0100
+++ b/uh_parser/RaptorError.pm	Mon May 10 14:23:00 2010 +0100
@@ -187,6 +187,8 @@
 	$characters =~ s,^[\r\n]*,,;
 	$characters =~ s,[\r\n]*$,,;
 	
+	#print "error: -->$characters<--\n";
+	
 	my $package = '';
 	# if bldinf attribute is not available then heuristically attempt to determine the package
 	if (!$raptor_error_info->{bldinf} &&