--- a/kernel/eka/rombuild/rom_sbs.pl	Fri Jul 23 10:28:58 2010 +0100
+++ b/kernel/eka/rombuild/rom_sbs.pl	Mon Jul 26 11:06:41 2010 +0100
@@ -128,8 +128,8 @@
 	$Epoc32Path .= $EpocRoot . "epoc32";
 	$toolpath = "$Epoc32Path\\tools\\";
 	push @INC, $toolpath;
-	$BasePath = $toroot;
-	$BasePath =~ s/\\$/$e32path\\/;
+	$BasePath = "$toroot$e32path\\";    # Note: toroot may be empty!
+	$BasePath =~ s/\\\\/\\/g;	# clean up path seaprators
 }
 
 use E32Plat;