wip

zx

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