2
0
Эх сурвалжийг харах

only use base file name (not including directory) for generating unique boot_xxxx name

Nicolas Cannasse 13 жил өмнө
parent
commit
28249732c5
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      genswf.ml

+ 1 - 1
genswf.ml

@@ -793,7 +793,7 @@ let build_swf8 com codeclip exports =
 	clips @ code
 
 let build_swf9 com file swc =
-	let boot_name = if swc <> None || Common.defined com "haxe-boot" then "haxe" else "boot_" ^ (String.sub (Digest.to_hex (Digest.string file)) 0 4) in
+	let boot_name = if swc <> None || Common.defined com "haxe-boot" then "haxe" else "boot_" ^ (String.sub (Digest.to_hex (Digest.string (Filename.basename file))) 0 4) in
 	let code = Genswf9.generate com boot_name in
 	let code = (match swc with
 	| Some cat ->