local text = require 'text'

local function str_to_uppercase (s)
  return pandoc.Str(text.upper(s.text))
end

function Header (el)
  return pandoc.walk_block(el, {Str = str_to_uppercase})
end