Sancaros/egs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

egs_user_model: Authenticated users shouldn't be cleaned up.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-07-20 01:38:00 +02:00
parent f86aeb8f17
commit 04265d71dc
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/egs_user_model.erl
View File

@ -126,6 +126,7 @@ handle_cast({delete, ID}, State) ->
handle_cast(cleanup, State) -> handle_cast(cleanup, State) ->
Timeout = calendar:datetime_to_gregorian_seconds(calendar:universal_time()) - 300, Timeout = calendar:datetime_to_gregorian_seconds(calendar:universal_time()) - 300,
List = do(qlc:q([X#?TABLE.id || X <- mnesia:table(?TABLE), List = do(qlc:q([X#?TABLE.id || X <- mnesia:table(?TABLE),
X#?TABLE.state /= authenticated,
X#?TABLE.state /= online, X#?TABLE.state /= online,
X#?TABLE.time < Timeout X#?TABLE.time < Timeout
])), ])),