Lib: Test help output with FR localeHEADmaster

Check that translation and the `ReaderT` really do work by changing
localisation of the STDOUT "help" output from `EN` to `FR`.

To actually test this, add a french translation of the `GitHubCommit`
plugin description. This string is successfully output by the "help"
plugin.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/Lib.hs b/src/Lib.hs
index 821a49b..1d831ce 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -17,7 +17,7 @@ import PluginList as PL (plugins)
 import Control.Monad.Reader (runReaderT)
 import CliOptions (Options(..))
 import Plugin.Help as Help (help)
-import I18n (Locale(EN))
+import I18n (Locale(EN, FR))
 import Plugin (performPlugin)
 import qualified Data.Text.IO as TIO
 
@@ -42,7 +42,7 @@ someFunc = do
                 }))
         Options
             { slackApiToken = "booya"
-            , language = EN
+            , language = FR
             }
     case hilp of
         Left x -> TIO.putStrLn x