diff --git a/zomp/lib/otpr/zx/0.4.0/src/zx_lib.erl b/zomp/lib/otpr/zx/0.4.0/src/zx_lib.erl index efabcfa..d87c288 100644 --- a/zomp/lib/otpr/zx/0.4.0/src/zx_lib.erl +++ b/zomp/lib/otpr/zx/0.4.0/src/zx_lib.erl @@ -566,8 +566,11 @@ zsp_path(PackageID = {Realm, _, _}) -> -spec print_user({zx:user_name(), zx:real_name(), [zx:contact_info()]}) -> ok. -print_user({UserName, RealName, [{"email", Email}]}) -> - io:format("~ts (~ts <~ts>) ~n", [UserName, RealName, Email]). +print_user({UserName, RealName, ContactInfo}) -> + case proplist:get_value("email", ContactInfo, none) of + none -> io:format("~ts (~ts)~n", [UserName, RealName]); + Email -> io:format("~ts (~ts) <~ts>~n", [UserName, RealName, Email]) + end. -spec find_latest_compatible(Version, Versions) -> Result