uh_parser/RaptorError.pm
changeset 254 fde18ad07a01
parent 252 f593b7acdb37
child 258 08436a227940
equal deleted inserted replaced
253:b59a964f37ef 254:fde18ad07a01
   185 	#print "on_end_buildlog_error\n";
   185 	#print "on_end_buildlog_error\n";
   186 	
   186 	
   187 	$characters =~ s,^[\r\n]*,,;
   187 	$characters =~ s,^[\r\n]*,,;
   188 	$characters =~ s,[\r\n]*$,,;
   188 	$characters =~ s,[\r\n]*$,,;
   189 	
   189 	
       
   190 	#print "error: -->$characters<--\n";
       
   191 	
   190 	my $package = '';
   192 	my $package = '';
   191 	# if bldinf attribute is not available then heuristically attempt to determine the package
   193 	# if bldinf attribute is not available then heuristically attempt to determine the package
   192 	if (!$raptor_error_info->{bldinf} &&
   194 	if (!$raptor_error_info->{bldinf} &&
   193 		$characters =~ m,.*?([/\\]sf[/\\](os|mw|app|tools|ostools|adaptation)[/\\][a-zA-Z]+[/\\]?),s)
   195 		$characters =~ m,.*?([/\\]sf[/\\](os|mw|app|tools|ostools|adaptation)[/\\][a-zA-Z]+[/\\]?),s)
   194 	{
   196 	{