fix: compare parsed versions

This commit is contained in:
Thales Macedo Garitezi 2022-08-23 17:49:31 -03:00
parent c52286a20a
commit 81b0844f03
1 changed files with 1 additions and 1 deletions

View File

@ -90,7 +90,7 @@ main(["insert-new-vsn", NewVsn0, BaseFromVsn0, OtpVsn0, VsnDB]) ->
NewVsnList = NewVsnList =
lists:sort( lists:sort(
fun({Vsn1, _}, {Vsn2, _}) -> fun({Vsn1, _}, {Vsn2, _}) ->
Vsn1 < Vsn2 parse_vsn(Vsn1) < parse_vsn(Vsn2)
end, maps:to_list(NewVsnMap)), end, maps:to_list(NewVsnMap)),
file:write_file(VsnDB, io_lib:format("%% -*- mode: erlang; -*-\n\n~p.~n", [NewVsnList])), file:write_file(VsnDB, io_lib:format("%% -*- mode: erlang; -*-\n\n~p.~n", [NewVsnList])),
halt(0); halt(0);