set-conversation ( conversation -- )

Vocabulary

furnace.conversations

Inputs

conversation

an object

Outputs

None

Definition

USING: accessors kernel namespaces ;

IN: furnace.conversations

: set-conversation ( conversation -- )
    [
        [ conversation set ] [ id>> conversation-id set ]
        [ save-conversation-after ] tri
    ] when* ;