uh_parser/RaptorError.pm
changeset 232 fde18ad07a01
parent 230 f593b7acdb37
child 236 08436a227940
equal deleted inserted replaced
231:b59a964f37ef 232: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 	{