use lists:unzip/1

Just a little thing I noticed could be improved.

src/hz_aaci.erl

@@ -732,8 +732,7 @@ coerce_map_to_record(O, N, MemberTypes, Map) ->
     end.
 
 coerce_record_to_map(O, N, MemberTypes, Tuple) ->
-    Names = [Name || {Name, _} <- MemberTypes],
-    Types = [Type || {_, Type} <- MemberTypes],
+    {Names, Types} = lists:unzip(MemberTypes),
     Terms = tuple_to_list(Tuple),
     % FIXME: We could go through and change the record_element paths into field
     % paths?