factor-clean-branch ( -- str )

Vocabulary

zealot.factor

Inputs

None

Outputs

str

an object

Definition

USING: accessors assocs kernel sequences system ;

IN: zealot.factor

: factor-clean-branch ( -- str )
    os cpu [ name>> ] bi@ { { 46 45 } } substitute "-" glue
    "origin/clean-" prepend ;