cosmetics

src/Gargantext/Pages/Corpus/User/Users/Types.purs

@@ -32,7 +32,7 @@ projectSpec = focus _projectslens _projectsAction PS.projets
 
 facets :: forall eff props. Spec ( dom :: DOM, console :: CONSOLE, ajax :: AJAX| eff) State props Action
 facets = tabs _tablens _tabAction $ fromFoldable
-         [ Tuple "Publications(12)" publicationSpec
+         [ Tuple "Publications (12)" publicationSpec
          , Tuple "Brevets (2)" brevetSpec
          , Tuple "Projets IMT (5)" projectSpec
       ]

src/Gargantext/Router.purs

@@ -21,8 +21,8 @@ data Routes
   | AddCorpus
   | DocView
   | SearchView
-  | UserPage Int
-  | DocAnnotation Int
+  | UserPage       Int
+  | DocAnnotation  Int
   | Tabview
   | CorpusAnalysis
   | PGraphExplorer
@@ -31,18 +31,18 @@ data Routes
 
 
 instance showRoutes :: Show Routes where
-  show Login = "Login"
-  show AddCorpus = "AddCorpus"
-  show DocView = "DocView"
-  show SearchView = "SearchView"
-  show (UserPage i) = "UserPage"
+  show Login            = "Login"
+  show AddCorpus        = "AddCorpus"
+  show DocView          = "DocView"
+  show SearchView       = "SearchView"
+  show (UserPage i)     = "UserPage"
   show (DocAnnotation i)= "DocumentView"
-  show Tabview = "Tabview"
-  show CorpusAnalysis = "corpus"
-  show PGraphExplorer = "graphExplorer"
-  show NGramsTable = "NGramsTable"
-  show Dashboard = "Dashboard"
-  show Home = "Home"
+  show Tabview          = "Tabview"
+  show CorpusAnalysis   = "corpus"
+  show PGraphExplorer   = "graphExplorer"
+  show NGramsTable      = "NGramsTable"
+  show Dashboard        = "Dashboard"
+  show Home             = "Home"
 
 int :: Match Int
 int = floor <$> num