cosmetics

src/CorpusAnalysis.purs

 module CorpusAnalysis where
+
 import Control.Monad.Eff.Console (CONSOLE)
 import DOM (DOM)
 import Data.Array (fold)

src/DocView.purs

@@ -35,18 +35,14 @@ import Unsafe.Coerce (unsafeCoerce)
 import Gargantext.REST (get)
 
 
-main :: forall e. Eff (dom:: DOM, console :: CONSOLE, ajax :: AJAX | e) Unit
-main = do
-  case createReactSpec layoutDocview tdata of
-    { spec, dispatcher } -> void $ do
-      document  <- DOM.window >>= DOM.document
-      container <- unsafePartial (fromJust  <$> DOM.querySelector (QuerySelector "#app") (DOM.htmlDocumentToParentNode document))
-      RDOM.render (R.createFactory (R.createClass spec) {}) container
-
--- main :: forall e. Eff (console :: CONSOLE | e) Unit
--- main = do
---   log "Hello sailor!"
-
+--main :: forall e. Eff (dom:: DOM, console :: CONSOLE, ajax :: AJAX | e) Unit
+--main = do
+--  case createReactSpec layoutDocview tdata of
+--    { spec, dispatcher } -> void $ do
+--      document  <- DOM.window >>= DOM.document
+--      container <- unsafePartial (fromJust  <$> DOM.querySelector (QuerySelector "#app") (DOM.htmlDocumentToParentNode document))
+--      RDOM.render (R.createFactory (R.createClass spec) {}) container
+--
 -- TODO: Pagination Details are not available from the BackEnd
 -- TODO: PageSize Change manually sets the totalPages, need to get from backend and reload the data
 -- TODO: Search is pending

src/Tabview.purs

@@ -24,7 +24,7 @@ data Action
   | SourceviewA SV.Action
   | AuthorviewA AV.Action
   | TermsviewA TV.Action
-  | TabViewA Tab.Action
+  | TabViewA   Tab.Action
   | NoOp
 
 type State =
@@ -118,7 +118,7 @@ _tabAction = prism TabViewA \ action ->
 
 tab1 :: forall eff props. Spec ( dom :: DOM, console :: CONSOLE, ajax :: AJAX| eff) State props Action
 tab1 = tabs _tablens _tabAction $ fromFoldable [ Tuple "Doc View" docPageSpec
-      , Tuple "Author View" authorPageSpec
-      , Tuple "Source View" sourcePageSpec
-      , Tuple "Terms View" termsPageSpec
-]
+                                               , Tuple "Author View" authorPageSpec
+                                               , Tuple "Source View" sourcePageSpec
+                                               , Tuple "Terms View" termsPageSpec
+                                               ]