|
@@ -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 ->
|