diff --git a/data/relup-paths.eterm b/data/relup-paths.eterm index ee4840f11..02d171e8f 100644 --- a/data/relup-paths.eterm +++ b/data/relup-paths.eterm @@ -1,32 +1,32 @@ %% -*- mode: erlang; -*- -[{<<"4.4.0">>,#{from_versions => [],otp => <<"24.1.5-3">>}}, - {<<"4.4.1">>,#{from_versions => [<<"4.4.0">>],otp => <<"24.1.5-3">>}}, - {<<"4.4.2">>, - #{from_versions => [<<"4.4.0">>,<<"4.4.1">>],otp => <<"24.1.5-3">>}}, - {<<"4.4.3">>, - #{from_versions => [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>], - otp => <<"24.1.5-3">>}}, - {<<"4.4.4">>, - #{from_versions => [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>], - otp => <<"24.1.5-3">>}}, - {<<"4.4.5">>, - #{from_versions => - [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>], - otp => <<"24.1.5-3">>}}, - {<<"4.4.6">>, - #{from_versions => - [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, - <<"4.4.5">>], - otp => <<"24.1.5-3">>}}, - {<<"4.4.7">>, - #{from_versions => - [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, - <<"4.4.5">>,<<"4.4.6">>], - otp => <<"24.1.5-3">>}}, - {<<"4.4.8">>, - #{from_versions => - [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, - <<"4.4.5">>,<<"4.4.6">>,<<"4.4.7">>], - otp => <<"24.1.5-3">>}}, - {<<"4.5.0">>,#{from_versions => [<<"4.4.8">>],otp => <<"24.3.4.2-1">>}}]. +{<<"4.4.0">>,#{from_versions => [],otp => <<"24.1.5-3">>}}. +{<<"4.4.1">>,#{from_versions => [<<"4.4.0">>],otp => <<"24.1.5-3">>}}. +{<<"4.4.2">>, + #{from_versions => [<<"4.4.0">>,<<"4.4.1">>],otp => <<"24.1.5-3">>}}. +{<<"4.4.3">>, + #{from_versions => [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>], + otp => <<"24.1.5-3">>}}. +{<<"4.4.4">>, + #{from_versions => [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>], + otp => <<"24.1.5-3">>}}. +{<<"4.4.5">>, + #{from_versions => + [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>], + otp => <<"24.1.5-3">>}}. +{<<"4.4.6">>, + #{from_versions => + [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, + <<"4.4.5">>], + otp => <<"24.1.5-3">>}}. +{<<"4.4.7">>, + #{from_versions => + [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, + <<"4.4.5">>,<<"4.4.6">>], + otp => <<"24.1.5-3">>}}. +{<<"4.4.8">>, + #{from_versions => + [<<"4.4.0">>,<<"4.4.1">>,<<"4.4.2">>,<<"4.4.3">>,<<"4.4.4">>, + <<"4.4.5">>,<<"4.4.6">>,<<"4.4.7">>], + otp => <<"24.1.5-3">>}}. +{<<"4.5.0">>,#{from_versions => [<<"4.4.8">>],otp => <<"24.3.4.2-1">>}}. diff --git a/scripts/relup-base-vsns.escript b/scripts/relup-base-vsns.escript index cf1164ed9..94cc4bd4f 100755 --- a/scripts/relup-base-vsns.escript +++ b/scripts/relup-base-vsns.escript @@ -92,7 +92,14 @@ main(["insert-new-vsn", NewVsn0, BaseFromVsn0, OtpVsn0, VsnDB]) -> fun({Vsn1, _}, {Vsn2, _}) -> parse_vsn(Vsn1) < parse_vsn(Vsn2) end, maps:to_list(NewVsnMap)), - file:write_file(VsnDB, io_lib:format("%% -*- mode: erlang; -*-\n\n~p.~n", [NewVsnList])), + {ok, FD} = file:open(VsnDB, [write]), + io:format(FD, "%% -*- mode: erlang; -*-\n\n", []), + lists:foreach( + fun(Entry) -> + io:format(FD, "~p.~n", [Entry]) + end, + NewVsnList), + file:close(FD), halt(0); main(["check-vsn-db", NewVsn0, VsnDB]) -> VsnMap = read_db(VsnDB), @@ -268,7 +275,7 @@ available_versions_index() -> maps:from_list([{Vsn, true} || Vsn <- AllVersions]). read_db(VsnDB) -> - {ok, [VsnList]} = file:consult(VsnDB), + {ok, VsnList} = file:consult(VsnDB), maps:from_list(VsnList). print_warning(Msg) ->