ensure-domain ( cookie -- cookie )

Vocabulary

http.server

Inputs

cookie

an object

Outputs

cookie

an object

Definition

USING: accessors kernel namespaces urls ;

IN: http.server

: ensure-domain ( cookie -- cookie )
    [ url get host>> dup "localhost" = [ drop ] [ or ] if ]
    change-domain ;