log-request ( request -- )

Vocabulary

http.server

Inputs

request

an object

Outputs

None

Definition

USING: accessors arrays kernel sequences ;

IN: http.server

: log-request ( request -- )
    [ [ method>> ] [ url>> ] bi 2array httpd-hit ] [
        { "user-agent" "x-forwarded-for" } [ log-header ] with
        each
    ] bi ;