--------------------------------------------------------------------------------

myHead :: Html
myHead = head $ do
  title "my page title"
  link ! attrs [rel "icon", href "/favicon.ico", type_ "image/x-icon"]

  meta ! attrs [name "keywords", content "Matt Chan, Matthew Chan"]
  meta ! attrs [name "author"  , content "Matt Chan"]
  meta ! attrs [name "viewport", content "width=device-width, initial-scale=1.0"]

  meta ! attrs [httpEquiv "content-type"    , content "text/html; charset=utf-8"]
  meta ! attrs [httpEquiv "content-language", content "en-us"]
  meta ! attrs [httpEquiv "X-UA-Compatible" , content "IE=edge,chrome=1"]

  style ! attrs [type_ "text/css", media "screen", A.title "matt"]
    $ foldMap cssImport
    [ "//maxcdn.bootstrapcdn.com/bootstrap/3.3.1/css/bootstrap.min.css"
    , "/assets/matt.css"
    , "/assets/syntax.css"
    , "/assets/toc.css"
    ]

  script0 ! src "//code.jquery.com/jquery-latest.min.js"
  script0 ! src "//netdna.bootstrapcdn.com/bootstrap/3.0.0/js/bootstrap.min.js"
  script0 ! src "https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"
  script0 ! src "/assets/matt.js"

  script ! type_ "text/x-mathjax-config" $ preEscapedString mathJax
  script $ preEscapedString googAnalytics
myHead :: Html
myHead = head $ do
  title "my page title"
  link ! attrs [rel "icon", href "/favicon.ico", type_ "image/x-icon"]

  meta ! attrs [name "keywords", content "Matt Chan, Matthew Chan"]
  meta ! attrs [name "author"  , content "Matt Chan"]
  meta ! attrs [name "viewport", content "width=device-width, initial-scale=1.0"]

  meta ! attrs [httpEquiv "content-type"    , content "text/html; charset=utf-8"]
  meta ! attrs [httpEquiv "content-language", content "en-us"]
  meta ! attrs [httpEquiv "X-UA-Compatible" , content "IE=edge,chrome=1"]

  style ! attrs [type_ "text/css", media "screen", A.title "matt"]
    $ foldMap cssImport
    [ "//maxcdn.bootstrapcdn.com/bootstrap/3.3.1/css/bootstrap.min.css"
    , "/assets/matt.css"
    , "/assets/syntax.css"
    , "/assets/toc.css"
    ]

  script0 ! src "//code.jquery.com/jquery-latest.min.js"
  script0 ! src "//netdna.bootstrapcdn.com/bootstrap/3.0.0/js/bootstrap.min.js"
  script0 ! src "https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"
  script0 ! src "/assets/matt.js"

  script ! type_ "text/x-mathjax-config" $ preEscapedString mathJax
  script $ preEscapedString googAnalytics
myHead = head $ do
  title "my page title"
  link ! attrs [rel "icon", href "/favicon.ico", type_ "image/x-icon"]

  meta ! attrs [name "keywords", content "Matt Chan, Matthew Chan"]
  meta ! attrs [name "author"  , content "Matt Chan"]
  meta ! attrs [name "viewport", content "width=device-width, initial-scale=1.0"]

  meta ! attrs [httpEquiv "content-type"    , content "text/html; charset=utf-8"]
  meta ! attrs [httpEquiv "content-language", content "en-us"]
  meta ! attrs [httpEquiv "X-UA-Compatible" , content "IE=edge,chrome=1"]

  style ! attrs [type_ "text/css", media "screen", A.title "matt"]
    $ foldMap cssImport
    [ "//maxcdn.bootstrapcdn.com/bootstrap/3.3.1/css/bootstrap.min.css"
    , "/assets/matt.css"
    , "/assets/syntax.css"
    , "/assets/toc.css"
    ]

  script0 ! src "//code.jquery.com/jquery-latest.min.js"
  script0 ! src "//netdna.bootstrapcdn.com/bootstrap/3.0.0/js/bootstrap.min.js"
  script0 ! src "https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"
  script0 ! src "/assets/matt.js"

  script ! type_ "text/x-mathjax-config" $ preEscapedString mathJax
  script $ preEscapedString googAnalytics