diff options
| author | alisdair sullivan <alisdairsullivan@yahoo.ca> | 2017-02-27 09:32:29 -0600 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2017-02-27 09:32:29 -0600 |
| commit | 55b4b761af69f553bf482f403788e0edd28165e2 (patch) | |
| tree | 8b3e0f1b5bba61c30b226c527c4d739276ebe60d /src | |
| parent | a4df4ece160ceba41ad2a53395cebb97d6939130 (diff) | |
| parent | e6193b49036c5c3332cc47db569864dffeabb4d8 (diff) | |
Merge pull request #1494 from ferd/escript-generate-cmd-win32
Windows escripts get cmd autogenerated
Diffstat (limited to 'src')
| -rw-r--r-- | src/rebar_prv_escriptize.erl | 20 |
1 files changed, 17 insertions, 3 deletions
diff --git a/src/rebar_prv_escriptize.erl b/src/rebar_prv_escriptize.erl index 7ee20c2..5c0c989 100644 --- a/src/rebar_prv_escriptize.erl +++ b/src/rebar_prv_escriptize.erl @@ -130,9 +130,15 @@ escriptize(State0, App) -> throw(?PRV_ERROR({escript_creation_failed, AppName, EscriptError})) end, - %% Finally, update executable perms for our script - {ok, #file_info{mode = Mode}} = file:read_file_info(Filename), - ok = file:change_mode(Filename, Mode bor 8#00111), + %% Finally, update executable perms for our script on *nix or write out + %% script files on win32 + case os:type() of + {unix, _} -> + {ok, #file_info{mode = Mode}} = file:read_file_info(Filename), + ok = file:change_mode(Filename, Mode bor 8#00111); + {win32, _} -> + write_windows_script(Filename) + end, {ok, State}. -spec format_error(any()) -> iolist(). @@ -258,3 +264,11 @@ def(Rm, State, Key, Default) -> rm_newline(String) -> [C || C <- String, C =/= $\n]. + +write_windows_script(Target) -> + CmdScript= + "@echo off\r\n" + "setlocal\r\n" + "set rebarscript=%~f0\r\n" + "escript.exe \"%rebarscript:.cmd=%\" %*\r\n", + ok = file:write_file(Target ++ ".cmd", CmdScript). |