" Test for the HelpTOC package

source util/screendump.mnv

func Test_helptoc_markdown_with_comments()
  CheckScreendump
  let lines =<< trim END
    packadd helptoc
    e Xmarkdown.md
    call append(0, [
          \ '# Heading 1',
          \ '',
          \ 'Some text.',
          \ '',
          \ '```mnv',
          \ '# This is a MNV9Script comment',
          \ 'def MyFunc()',
          \ '  # Another comment',
          \ 'enddef',
          \ '```',
          \ '# Another Heading 1',
          \ '',
          \ '```',
          \ '# This is a comment in a codeblock',
          \ '```',
          \ '# Last Heading 1',
          \ 'and more text'
          \])
  END

  let input_file = "Xhelptoc.mnv"
  call writefile(lines, input_file, "D")

  let buf = RunMNVInTerminal($"-S {input_file}", {})
  call term_sendkeys(buf, ":HelpToc\<cr>")
  call WaitFor({-> term_getline(buf, 1) =~ 'press ? for help'})
  call VerifyScreenDump(buf, 'Test_helptoc_markdown_01', {})
  call term_sendkeys(buf, ":qa!\<cr>")
  call StopMNVInTerminal(buf)
endfunc