diff options
| author | Joris Guyonvarch | 2014-04-06 22:55:16 +0200 |
|---|---|---|
| committer | Joris | 2019-05-01 15:34:22 +0200 |
| commit | 0fe906ae7453aa684e998bbcc7a78b62d84f0206 (patch) | |
| tree | d3968af830b964193349187fb6fc583780cd0ce3 /src/View/Icon.hs | |
| parent | 8b11c4be2b3ac354fa14534662dbd92374617a3e (diff) | |
Show resume and projects from a configuration file
Diffstat (limited to 'src/View/Icon.hs')
| -rw-r--r-- | src/View/Icon.hs | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/View/Icon.hs b/src/View/Icon.hs new file mode 100644 index 0000000..67db0a9 --- /dev/null +++ b/src/View/Icon.hs @@ -0,0 +1,17 @@ +{-# LANGUAGE OverloadedStrings #-} + +module View.Icon + ( renderIcon + ) where + +import Data.String (fromString) + +import Text.Blaze.Html +import Text.Blaze.Html5 +import Text.Blaze.Html5.Attributes + +renderIcon :: String -> Html +renderIcon iconName = + i + ! class_ (fromString $ "fa fa-fw fa-" ++ iconName) + $ "" |