From f5cbc0b753fb94785024ed81bb3738c10434bd61 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Thu, 13 Dec 2018 19:09:39 +0100 Subject: ... --- src/ataxia_security.erl | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/ataxia_security.erl') diff --git a/src/ataxia_security.erl b/src/ataxia_security.erl index 97ed276..192171f 100644 --- a/src/ataxia_security.erl +++ b/src/ataxia_security.erl @@ -14,6 +14,7 @@ -export([can_access/2]). -export([janitor/0, any/0, admin/0, user_from_id/1]). +-export([unlocked/0]). %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% @@ -34,6 +35,9 @@ any () -> any. -spec admin () -> user(). admin () -> admin. +-spec unlocked () -> atom(). +unlocked () -> none. + -spec can_access (permission(), user()) -> boolean(). can_access (_, admin) -> true; can_access (any, _) -> true; -- cgit v1.2.3-70-g09d2