anchor.diff:  {-# LANGUAGE QuasiQuotes #-}
   import Text.Hamlet (HtmlUrl, hamlet)
   import Data.Text (Text)
  -import Text.Blaze.Renderer.String (renderHtml)
  +import Text.Blaze.Html.Renderer.String (renderHtml)
   
   data MyRoute = Home | Time | Stylesheet
   
  
positive.code: import qualified Data.Text as T
  import Text.Hamlet (HtmlUrlI18n, ihamlet)
  import Text.Blaze (toHtml)
  import Text.Blaze.Renderer.String (renderHtml)
  
  data MyRoute = Home | Time | Stylesheet
  
  
negative.code: -- It will be explained later.
  {-# LANGUAGE QuasiQuotes #-}
  import Text.Hamlet (shamlet)
  import Text.Blaze.Html.Renderer.String (renderHtml)
  import Data.Char (toLower)
  import Data.List (sort)
  
  