This commit is contained in:
Craig Everett 2017-11-30 07:01:02 +09:00
parent c37da63bdc
commit dac06ff5b4

4
zx
View File

@ -1783,7 +1783,7 @@ create_realm(ZompConf, Realm, ExAddress, ExPort, InPort, UserName, Email) ->
ok = write_terms(RealmFile, RealmMeta), ok = write_terms(RealmFile, RealmMeta),
ok = write_terms(ZompFile, NewZompConf), ok = write_terms(ZompFile, NewZompConf),
ok = log(info, "Realm ~ts created.", [Realm]), ok = log(info, "Realm ~ts created.", [Realm]),
halt(0). create_realmfile(Realm).
-spec create_realmfile(realm()) -> no_return(). -spec create_realmfile(realm()) -> no_return().
@ -1819,7 +1819,7 @@ create_realmfile(Realm, ConfPath, RealmKeyIDs, PackageKeyIDs) ->
OutFile = filename:join(CWD, Realm ++ ".zrf"), OutFile = filename:join(CWD, Realm ++ ".zrf"),
ok = erl_tar:create(OutFile, Targets, [compressed]), ok = erl_tar:create(OutFile, Targets, [compressed]),
ok = log(info, "Realm conf file written to ~ts", [OutFile]), ok = log(info, "Realm conf file written to ~ts", [OutFile]),
create_realmfile(Realm). halt(0).
-spec create_sysop() -> no_return(). -spec create_sysop() -> no_return().