[REFACTOR] FrontEnd serving files.

gargantext.cabal

@@ -2,7 +2,7 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 4e7c51f92304a8a22c00c60b641f336bcfa0c3994bd4beac6f2e9eafa90c408a
+-- hash: d4561cbff71c5a3432f81acb07d955452c13d94813fdc788977e81067144e27b
 
 name:           gargantext
 version:        0.1.0.0
@@ -57,8 +57,8 @@ library
       Gargantext.Utils.Prefix
   other-modules:
       Gargantext.API.Count
+      Gargantext.API.FrontEnd
       Gargantext.API.Node
-      Gargantext.API.Swagger
       Gargantext.Database.Queries
       Gargantext.Utils
       Paths_gargantext

src/Gargantext/API.hs

@@ -57,9 +57,11 @@ import           Servant
 import           Servant.Mock (mock)
 import           Servant.Swagger
 import           Servant.Swagger.UI
-import           Servant.Static.TH (createApiAndServerDecs)
 -- import Servant.API.Stream
 
+--import Gargantext.API.Swagger
+import Gargantext.API.FrontEnd (FrontEndAPI, frontEndServer)
+
 import Gargantext.API.Node ( Roots    , roots
                            , NodeAPI  , nodeAPI
                            , NodesAPI , nodesAPI
@@ -73,14 +75,9 @@ type PortNumber = Int
 ---------------------------------------------------------------------
 -- | API Global
 
-
 -- | API for serving @swagger.json@
--- TODO Do we need to add this in the API ?
--- type SwaggerAPI = "swagger.json" :> Get '[JSON] Swagger
-
 type SwaggerAPI = SwaggerSchemaUI "swagger-ui" "swagger.json"
 
-
 -- | API for serving main operational routes of @gargantext.org@
 type GargAPI =  "user"  :> Summary "First user endpoint" 
                         :> Roots
@@ -106,9 +103,6 @@ type GargAPI =  "user"  :> Summary "First user endpoint"
        -- :<|> "ngrams"   :> Capture "id" Int  :> NodeAPI
        -- :<|> "auth"     :> Capture "id" Int  :> NodeAPI
 ---------------------------------------------------------------------
--- | Serve front end files
-$(createApiAndServerDecs "FrontEndAPI" "frontEndServer" "frontEnd")
-
 type SwaggerFrontAPI = SwaggerAPI :<|> FrontEndAPI 
 
 type API = SwaggerFrontAPI :<|> GargAPI

src/Gargantext/API/FrontEnd.hs

+{-|
+Module      : Gargantext.API.FrontEnd
+Description : Server FrontEnd API
+Copyright   : (c) CNRS, 2017-Present
+License     : AGPL + CECILL v3
+Maintainer  : team@gargantext.org
+Stability   : experimental
+Portability : POSIX
+-}
+
+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
+
+{-# LANGUAGE DataKinds                   #-}
+{-# LANGUAGE TemplateHaskell             #-}
+
+---------------------------------------------------------------------
+module Gargantext.API.FrontEnd
+      where
+
+import           Servant.Static.TH (createApiAndServerDecs)
+
+---------------------------------------------------------------------
+$(createApiAndServerDecs "FrontEndAPI" "frontEndServer" "frontEnd")
+---------------------------------------------------------------------
+