summaryrefslogtreecommitdiff
path: root/src/acse.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/acse.erl')
-rw-r--r--src/acse.erl10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/acse.erl b/src/acse.erl
index 1112345..a77fab0 100644
--- a/src/acse.erl
+++ b/src/acse.erl
@@ -23,11 +23,11 @@ release() ->
decode(Data) ->
'ACSE-1':decode('ACSE-apdu', Data).
-dispatch({aare, #'AARE-apdu'{result = Result}}) ->
- case Result of
- accepted -> ok;
- _ -> error
- end;
+dispatch({aare, #'AARE-apdu'{result = accepted}}) ->
+ ok;
+
+dispatch({aare, #'AARE-apdu'{}}) ->
+ error;
dispatch({rlre, _}) ->
ok;