<%
  puts '<html>'
  puts '  <head>'
  puts '    <title>Kingmaker</title>'
  puts '  </head>'
  puts '  <body>'

  pages = {
    'characters' => 'character.rhtml',
    'text' => 'text.rhtml',
  }

  puts '    <ul>'

  pages.keys.sort.each do |k|
    print '      <li>'
    print '<a href="'
    print pages[k]
    print '">'
    print k
    puts '</a></li>'
  end

  puts '    </ul>'
  puts '  </body>'
  puts '</html>'
%>
