map-fields-backward ( assoc field-map -- assoc )

Vocabulary

furnace.auth.providers.couchdb.private

Inputs

assoc	an object
field-map	an object

Outputs

assoc

an object

Definition

USING: assocs kernel ;

IN: furnace.auth.providers.couchdb.private

: map-fields-backward ( assoc field-map -- assoc )
    [ swapd value-at-or-k swap ] curry assoc-map ;