Fix Dialyzer warning

This commit is contained in:
Tuncer Ayaz 2012-01-09 12:42:53 +01:00
parent c15d99d8bb
commit 4e471e6986

View file

@ -179,10 +179,13 @@ make_tar(NameVer, NewVer, NewName) ->
ok = file:delete(Absname),
case os:type() of
{win32,_} ->
{ok, _} = file:copy(
filename:join([".", "releases", NewVer, "start.boot"]),
filename:join([".", "releases", NewVer, NewName ++ ".boot"]));
_ -> ok
{ok, _} =
file:copy(
filename:join([".", "releases", NewVer, "start.boot"]),
filename:join([".", "releases", NewVer, NewName ++ ".boot"])),
ok;
_ ->
ok
end,
{ok, Tar} = erl_tar:open(Absname, [write, compressed]),
ok = erl_tar:add(Tar, "lib", []),