--- a/imgtools/buildrom/tools/externaltools.pm	Tue Nov 30 17:14:57 2010 +0800
+++ b/imgtools/buildrom/tools/externaltools.pm	Wed Dec 01 16:05:36 2010 +0800
@@ -48,7 +48,7 @@
 				my $epocroot = $ENV{EPOCROOT};
 				$epocroot =~ s-\\-\/-g;
 				$epocroot .= "\/" unless ($epocroot =~ /\/$/);
-				$path =~ s-^EPOCROOT[\/\\]?-$epocroot-;
+				$path =~ s-^EPOCROOT(##)?[\/\\]?-$epocroot-;
 			}
 			push (@INC, $path);
 		}