check-descriptions ( element -- )

Vocabulary

help.lint.checks

Inputs

element

an object

Outputs

None

Definition

USING: help.markup kernel sequences ;

IN: help.lint.checks

: check-descriptions ( element -- )
    { $description $class-description $var-description } swap [
        elements [
            rest { { } { "" } } member?
            [ "Empty $description" simple-lint-error ] when
        ] each
    ] curry each ;