move-children ( source target -- )

Vocabulary

html5

Inputs

source	an object
target	an object

Outputs

None

Definition

USING: accessors kernel sequences ;

IN: html5

:: move-children ( source target -- )
    source children>> clone
    [ dup tag? [ dup detach-node ] when target attach-node ]
    each source children>> delete-all ;