M :: CXy -> Double -> String -> C.Render Double
renderLayoutM = 
  renderLayout' "IPA P明朝" (stringToLayoutGlowing fb ff)
  where
    fb l t = void $ G.layoutSetMarkup l ("<span foreground=\"white\">" ++ G.escapeMarkup t ++ "</span>")
    ff = G.layoutSetText

renderLayoutG'
renderLayoutM :: CXy -> Double -> String -> C.Render Double
renderLayoutM = 
  renderLayout' "IPA P明朝" (stringToLayoutGlowing fb ff)
  where
    fb l t = void $ G.layoutSetMarkup l ("<span foreground=\"white\">" ++ G.escapeMarkup t ++ "</span>")
    ff = G.layoutSetText
renderLayoutM = 
  renderLayout' "IPA P明朝" (stringToLayoutGlowing fb ff)
  where
    fb l t = void $ G.layoutSetMarkup l ("<span foreground=\"white\">" ++ G.escapeMarkup t ++ "</span>")
    ff = G.layoutSetText