:experimental:
btn:[OK]
>>>
Document
  { docMeta =
      Meta
        { docTitle = []
        , docTitleAttributes = Nothing
        , docAuthors = []
        , docRevision = Nothing
        , docAttributes =
            fromList [ ( "experimental" , "" ) , ( "sectids" , "" ) ]
        }
  , docBlocks =
      [ Block mempty Nothing (Paragraph [ Inline mempty (Button "OK") ])
      ]
  }