From d90b8b89e86c1c936c2c46b035e0afd52ba4230d Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Tue, 27 Oct 2015 15:42:30 +0100 Subject: Simplify --- acse.erl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'acse.erl') diff --git a/acse.erl b/acse.erl index 82ba4b1..46a930a 100644 --- a/acse.erl +++ b/acse.erl @@ -3,7 +3,7 @@ -include("ACSE-1.hrl"). -include("CSTA-application-context-information-csta3.hrl"). --export([user_information/0, associate_request/0, release_request/0]). +-export([associate_request/0, release_request/0]). -export([decode/1, accepted/1]). user_information() -> @@ -28,8 +28,7 @@ accepted({aarq, _}) -> error; accepted({aare, Apdu}) -> case Apdu#'AARE-apdu'.result of accepted -> ok; - 'rejected-permanent' -> error; - 'rejected-transient' -> error + _ -> error end; accepted({rlrq, _}) -> error; accepted({rlre, _}) -> error; -- cgit v1.2.3