packages feed

iptadmin-1.2.0: src/Template.hs

module Template where

htmlWrapper content = unlines ["",
 ""++"<?xml version=\"1.0\" encoding=\"utf-8\"?>",
 ""++"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">",
 ""++"<html xmlns=\"http://www.w3.org/1999/xhtml\">",
 ""++"    <head>",
 ""++"        <title>IptAdmin</title>",
 ""++"        <meta name=\"AUTHOR\" content=\"Evgeny Tarasov\" />",
 ""++"        <meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\" />",
 ""++"        <meta name=\"DESCRIPTION\" content=\"iptables web interface\"/>",
 ""++"        <meta name=\"KEYWORDS\" content=\"iptables, haskell\" />",
 ""++"        <link rel=\"stylesheet\" type=\"text/css\" href=\"/static/css/iptadmin-theme/jquery-ui-1.8.16.custom.css\" />",
 ""++"        <script type=\"text/javascript\" src=\"/static/js/jquery-1.6.2.min.js\"></script>",
 ""++"        <script type=\"text/javascript\" src=\"/static/js/jquery-ui-1.8.16.custom.min.js\"></script>",
 ""++"        <link href=\"/static/css/iptadmin.css\" rel=\"stylesheet\" type=\"text/css\" title=\"Iptadmin\" />",
 ""++"    </head>",
 ""++"    <body>",
 ""++content,
 ""++"    </body>",
 ""++"</html>",
 ""]