From c29627d6826dba1be9985f9a998bea420d842aae Mon Sep 17 00:00:00 2001 From: Nathanael Sensfelder Date: Sat, 5 Jan 2019 20:13:44 +0100 Subject: Implements most of ataxia_server's functions. --- src/ataxia_security.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/ataxia_security.erl') diff --git a/src/ataxia_security.erl b/src/ataxia_security.erl index e51ab3c..b1ec662 100644 --- a/src/ataxia_security.erl +++ b/src/ataxia_security.erl @@ -52,8 +52,8 @@ any () -> any. -spec admin () -> user(). admin () -> admin. --spec can_access (permission(), user()) -> boolean(). -can_access (Permission, User) -> +-spec can_access (user(), permission()) -> boolean(). +can_access (User, Permission) -> case User of admin -> true; janitor -> ordsets:is_element(User, Permission); -- cgit v1.2.3-70-g09d2