send-email-capped? ( -- ? )

Vocabulary

mason.email

Inputs

None

Outputs

?

an object

Definition

USING: calendar kernel math.order namespaces ;

IN: mason.email

: send-email-capped? ( -- ? )
    last-email-time get-global maximum-frequency ago after?
    [ throttle-emails f ] [ t ] if ;