sua_codec: rename generic part from sua -> xua
diff --git a/src/sua_codec.erl b/src/sua_codec.erl
index 9e2e203..ee7830c 100644
--- a/src/sua_codec.erl
+++ b/src/sua_codec.erl
@@ -58,8 +58,6 @@
 	NewOpt = {Tag, {Length, Value}},
 	parse_xua_opts(NextOpts, OptList ++ [NewOpt]).
 
-parse_sua_opt(Opt, Msg) ->
-	{Opt, Msg}.
 
 
 encode_msg(#sua_msg{version = Version, msg_class = MsgClass,
@@ -74,14 +72,14 @@
 encode_xua_opts([], Bin) ->
 	Bin;
 encode_xua_opts([{Iei, Attr}|Tail], Bin) ->
-	OptBin = encode_sua_opt(Iei, Attr),
+	OptBin = encode_xua_opt(Iei, Attr),
 	encode_xua_opts(Tail, <<Bin/binary, OptBin/binary>>).
 
-encode_sua_opt(Iei, {LenIn, Data}) when is_integer(Iei), is_binary(Data) ->
+encode_xua_opt(Iei, {LenIn, Data}) when is_integer(Iei), is_binary(Data) ->
 	Length = LenIn + 4,
 	PadLen = get_num_pad_bytes(Length),
 	<<Iei:16/big, Length:16/big, Data/binary, 0:PadLen/integer-unit:8>>;
-encode_sua_opt(Iei, Data) when is_integer(Iei), is_binary(Data) ->
+encode_xua_opt(Iei, Data) when is_integer(Iei), is_binary(Data) ->
 	Length = byte_size(Data) + 4,
 	PadLen = get_num_pad_bytes(Length),
 	<<Iei:16/big, Length:16/big, Data/binary, 0:PadLen/integer-unit:8>>.