new-server-state-manager ( responder class -- responder' )

Vocabulary

furnace.cache

Inputs

responder	an object
class	an object

Outputs

responder'

an object

Definition

USING: accessors calendar kernel ;

IN: furnace.cache

: new-server-state-manager ( responder class -- responder' )
    new swap >>responder 20 minutes >>timeout ; inline