start-body-frameset ( document element -- )

Vocabulary

html5

Inputs

document	an object
element	an object

Outputs

None

Definition

USING: accessors kernel math sequences ;

IN: html5

:: start-body-frameset ( document element -- )
    document open-elements>> :> stack document frameset-ok?>>
    stack length 1 > and [
        stack second :> body body html-element? body name>>
        "body" = and [
            body stack first children>> remove! drop
            1 stack shorten document element insert-element
            document in-frameset-mode >>insertion-mode drop
        ] when
    ] when ;