Fix binary_path on windows for change_dir_if_bundle()

Author: NHDaly

src/ApplicationBuilder.jl

@@ -51,7 +51,7 @@ end
 @static if is_linux() || is_windows()
 
 	function change_dir_if_bundle()
-		binary_path = split(string(Base.julia_cmd()), ' ')[1][2:end]
+ 		binary_path = PROGRAM_FILE  # PROGRAM_FILE is set manually in program.c
 		newpath = dirname(dirname(binary_path))
 		cd(newpath)
 		println("New pwd = $(pwd())")

src/bundle.jl

@@ -1,8 +1,11 @@
-function build_app_bundle(script::String; 
+if is_windows()
+	include("installer.jl")
+end
+function build_app_bundle(script::String;
 				resources = String[],
 				libraries = String[],
 				builddir = "builddir",
-				appname = "nothing", 
+				appname = "nothing",
 				create_installer = false)