--- a/uh_parser/RaptorUnreciped.pm	Mon Apr 12 13:26:38 2010 +0100
+++ b/uh_parser/RaptorUnreciped.pm	Mon Apr 12 14:47:03 2010 +0100
@@ -175,7 +175,7 @@
 		my $package = '';
 		my $guessed_bldinf = '';
 		# if bldinf attribute is not available then heuristically attempt to determine the package
-		if ($line =~ m,.*?(([/\\]sf)?[/\\](os|mw|app|tools|ostools|adaptation)[/\\][^/^\\]*[/\\]),s)
+		if ($line =~ m,.*?([/\\]sf[/\\](os|mw|app|tools|ostools|adaptation)[/\\][^/^\\]*[/\\]),s)
 		{
 			$guessed_bldinf = "$1... (guessed)";
 		}