Merge branch 'dev-right-panel-in-docs' of...

Merge branch 'dev-right-panel-in-docs' of ssh://gitlab.iscpif.fr:20022/gargantext/purescript-gargantext into dev-merge

dist/styles/Styles.css

@@ -12,6 +12,10 @@
 #page-wrapper .side-panel .header {
   float: right;
 }
+#page-wrapper .side-panel .corpus-doc-view .annotated-field-wrapper .annotated-field-runs {
+  max-height: 200px;
+  overflow-y: scroll;
+}
 
 .simple-layout {
   height: 100%;

dist/styles/Styles.sass

@@ -10,6 +10,11 @@
     width: 28%
     .header
       float: right
+    .corpus-doc-view
+      .annotated-field-wrapper
+        .annotated-field-runs
+          max-height: 200px
+          overflow-y: scroll
 
 .simple-layout
   height: 100%

src/Gargantext/Components/DocsTable.purs

@@ -126,7 +126,7 @@ docViewCpt = R.hooksComponentWithModule thisModule "docView" cpt where
       , params
       , query
       } _ = do
-    pure $ H.div {className: "container1"}
+    pure $ H.div { className: "doc-table-doc-view container1" }
       [ R2.row
         [ chart
         , if showSearch then searchBar query else H.div {} []
@@ -366,7 +366,7 @@ pagePaintRawCpt = R.hooksComponentWithModule thisModule "pagePaintRawCpt" cpt wh
         sid = sessionId session
         gi Favorite  = "glyphicon glyphicon-star"
         gi _ = "glyphicon glyphicon-star-empty"
-        trashClassName Trash _ = "trasn"
+        trashClassName Trash _ = "trash"
         trashClassName _ true = "active"
         trashClassName _ false = ""
         corpusDocument

src/Gargantext/Components/FacetsTable.purs

@@ -109,7 +109,7 @@ docViewCpt = R.hooksComponentWithModule thisModule "docView" cpt
         else
           snd path $ const ipp
 
-      pure $ H.div { className: "container1" }
+      pure $ H.div { className: "facets-doc-view container1" }
         [ R2.row
           [ chart
           , H.div { className: "col-md-12" }

src/Gargantext/Components/Nodes/Corpus/Document.purs

@@ -84,7 +84,7 @@ docViewCpt = R.hooksComponentWithModule thisModule "docView" cpt
         --    H.text (stringifyWithIndent 2 (encodeJson (fst state)))
         --  ] ] <>
         [
-        H.div { className: "container1" }
+        H.div { className: "corpus-doc-view container1" }
         [
           R2.row
           [

src/Gargantext/Components/Nodes/Home.purs

@@ -68,15 +68,15 @@ homeLayoutCpt = R.hooksComponentWithModule thisModule "homeLayout" cpt
     cpt {lang, backend, publicBackend, sessions, visible} _ = do
       let landingData = langLandingData lang
       pure $ H.span {}
-           [ H.div { className: "container1" } [ jumboTitle landingData false ]
-           , H.div { className: "container1" } [] -- TODO put research form
-           , H.div { className: "container1" } [ blocksRandomText' landingData ]
-           , H.div { className: "container1" } [ renderPublic { backend
-                                                              , publicBackend
-                                                              , sessions
-                                                              , visible
-                                                              }
-                                               ]
+           [ H.div { className: "home-title container1" } [ jumboTitle landingData false ]
+           , H.div { className: "home-research-form container1" } [] -- TODO put research form
+           , H.div { className: "home-landing-data container1" } [ blocksRandomText' landingData ]
+           , H.div { className: "home-public container1" } [ renderPublic { backend
+                                                                          , publicBackend
+                                                                          , sessions
+                                                                          , visible
+                                                                          }
+                                                           ]
            , license
            ]