Paste: misbehaving action

: <delete-action> ( -- action )
    <action>
        [ validate-integer-id ] >>validate
        [
            "id" value <envelope> delete-tuples
            list-envelopes-url <redirect>
        ] >>submit ;