steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Use if-box in http.server

db4
Slava Pestov 2008-02-29 10:37:39 -06:00
parent cc3f226cd3
commit 24b4fb0df9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/http/server/sessions/sessions.factor
View File

@ -23,7 +23,7 @@ TUPLE: session id manager namespace alarm ;
: timeout ( -- dt ) 20 minutes ; : timeout ( -- dt ) 20 minutes ;
: cancel-timeout ( session -- ) : cancel-timeout ( session -- )
alarm>> ?box [ cancel-alarm ] [ drop ] if ; alarm>> [ cancel-alarm ] if-box? ;
: delete-session ( session -- ) : delete-session ( session -- )
dup cancel-timeout dup cancel-timeout