toc-title.test

= Document Title
:toc:
:toc-title: Table of Adventures

== Cavern Glow
>>>
Document
  { docMeta =
      Meta
        { docTitle = [ Inline mempty (Str "Document Title") ]
        , docTitleAttributes = Nothing
        , docAuthors = []
        , docRevision = Nothing
        , docAttributes =
            fromList
              [ ( "sectids" , "" )
              , ( "toc" , "" )
              , ( "toc-title" , "Table of Adventures" )
              ]
        }
  , docBlocks =
      [ Block
          Attr
          ( [] , fromList [ ( "id" , "_cavern_glow" ) ] )
          Nothing
          (Section (Level 1) [ Inline mempty (Str "Cavern Glow") ] [])
      ]
  }