local system = require 'pandoc.system'
package.path = package.path .. ';' .. '/home/dzack/.pandoc/filters/?.lua;'
require "utilities"

function Div(el)
  if not ( 
    has_value(el.classes, "solution") 
    or has_value(el.classes, "proof") 
    or has_value(el.classes, "strategy")
    or has_value(el.classes, "concept")
    or has_value(el.classes, "flashcard")
  ) then
    return el
  end
  local env_name = ""
  if has_value(el.classes, "solution") then
      env_name = "solution"
    elseif has_value(el.classes, "proof") then
      env_name = "proof"
    elseif has_value(el.classes, "concept") then
      env_name = "concept"
    elseif has_value(el.classes, "strategy") then
      env_name = "strategy"
    elseif has_value(el.classes, "flashcard") then
      env_name = "flashcard"
  end
  table.insert(
    el.content, 1,
    pandoc.RawBlock("html", "<details><summary><i>(Click to expand "..env_name..")</i></summary>")
  )
  table.insert(
    el.content,
    pandoc.RawBlock("latex", "\\begin{"..env_name.."}")
  )
  table.insert(
    el.content,
    pandoc.RawBlock("latex", "\\end{"..env_name.."}")
  )
  table.insert(
    el.content,
    pandoc.RawBlock("html", "</details>")
  )
  return el
end