Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
purescript-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Grégoire Locqueville
purescript-gargantext
Commits
7734251e
Commit
7734251e
authored
Jun 22, 2018
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
cosmetics
parent
9a5d4242
Changes
3
Show whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
14 additions
and
17 deletions
+14
-17
CorpusAnalysis.purs
src/CorpusAnalysis.purs
+1
-0
DocView.purs
src/DocView.purs
+8
-12
Tabview.purs
src/Tabview.purs
+5
-5
No files found.
src/CorpusAnalysis.purs
View file @
7734251e
module CorpusAnalysis where
module CorpusAnalysis where
import Control.Monad.Eff.Console (CONSOLE)
import Control.Monad.Eff.Console (CONSOLE)
import DOM (DOM)
import DOM (DOM)
import Data.Array (fold)
import Data.Array (fold)
...
...
src/DocView.purs
View file @
7734251e
...
@@ -35,18 +35,14 @@ import Unsafe.Coerce (unsafeCoerce)
...
@@ -35,18 +35,14 @@ import Unsafe.Coerce (unsafeCoerce)
import Gargantext.REST (get)
import Gargantext.REST (get)
main :: forall e. Eff (dom:: DOM, console :: CONSOLE, ajax :: AJAX | e) Unit
--main :: forall e. Eff (dom:: DOM, console :: CONSOLE, ajax :: AJAX | e) Unit
main = do
--main = do
case createReactSpec layoutDocview tdata of
-- case createReactSpec layoutDocview tdata of
{ spec, dispatcher } -> void $ do
-- { spec, dispatcher } -> void $ do
document <- DOM.window >>= DOM.document
-- document <- DOM.window >>= DOM.document
container <- unsafePartial (fromJust <$> DOM.querySelector (QuerySelector "#app") (DOM.htmlDocumentToParentNode document))
-- container <- unsafePartial (fromJust <$> DOM.querySelector (QuerySelector "#app") (DOM.htmlDocumentToParentNode document))
RDOM.render (R.createFactory (R.createClass spec) {}) container
-- RDOM.render (R.createFactory (R.createClass spec) {}) container
--
-- main :: forall e. Eff (console :: CONSOLE | e) Unit
-- main = do
-- log "Hello sailor!"
-- TODO: Pagination Details are not available from the BackEnd
-- 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: PageSize Change manually sets the totalPages, need to get from backend and reload the data
-- TODO: Search is pending
-- TODO: Search is pending
...
...
src/Tabview.purs
View file @
7734251e
...
@@ -121,4 +121,4 @@ tab1 = tabs _tablens _tabAction $ fromFoldable [ Tuple "Doc View" docPageSpec
...
@@ -121,4 +121,4 @@ tab1 = tabs _tablens _tabAction $ fromFoldable [ Tuple "Doc View" docPageSpec
, Tuple "Author View" authorPageSpec
, Tuple "Author View" authorPageSpec
, Tuple "Source View" sourcePageSpec
, Tuple "Source View" sourcePageSpec
, Tuple "Terms View" termsPageSpec
, Tuple "Terms View" termsPageSpec
]
]
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment