do-order ( tuple order -- )

Vocabulary

db.queries

Inputs

tuple	an object
order	an object

Outputs

None

Definition

USING: accessors arrays kernel sequences strings ;

IN: db.queries

: do-order ( tuple order -- )
    dup string? [ 1array ] when
    [ ", " join " order by " glue ] curry change-sql drop ;