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
561ff7ca
Commit
561ff7ca
authored
Apr 17, 2018
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[HOME/Design]
parent
a0c03fc1
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
20 additions
and
20 deletions
+20
-20
Login.css
dist/css/Login.css
+0
-4
Gargantextuel.jpg
dist/images/Gargantextuel.jpg
+0
-0
DocView.purs
src/DocView.purs
+5
-2
Landing.purs
src/Landing.purs
+15
-14
No files found.
dist/css/Login.css
View file @
561ff7ca
...
...
@@ -16,10 +16,6 @@
border
:
3px
solid
white
;
}
#funnyimg
{
border
:
2px
solid
black
;
}
#page-wrapper
{
margin-top
:
96px
;
}
...
...
dist/images/Gargantextuel.jpg
0 → 100644
View file @
561ff7ca
5.29 KB
src/DocView.purs
View file @
561ff7ca
...
...
@@ -206,11 +206,14 @@ optps cv val = option [ selected (cv == val), value $ show val ] [text $ show va
textDescription :: Int -> PageSizes -> Int -> ReactElement
textDescription currPage pageSize totalRecords
= text $ "Showing " <> show start <> " to " <> show end <> " of " <> show totalRecords
= div [className "row"]
[ div [className "col-md-12"]
[ text $ "Showing " <> show start <> " to " <> show end <> " of " <> show totalRecords ]
]
where
start = (currPage - 1) * pageSizes2Int pageSize + 1
end' = currPage * pageSizes2Int pageSize
end = if end' > totalRecords then totalRecords else end'
end
= if end' > totalRecords then totalRecords else end'
pagination :: _ -> Int -> Int -> ReactElement
...
...
src/Landing.purs
View file @
561ff7ca
...
...
@@ -83,7 +83,7 @@ layoutLanding' hd = simpleSpec performAction render
render :: Render State props Action
render dispatch _ state _ =
[ div [ className "container1" ] [ jumboTitle hd false ]
, div [ className "container1" ] [
imageEnter hd (onClick \_ -> dispatch $ Enter)]
, div [ className "container1" ] [
] -- put research here
, div [ className "container1" ] [ blocksRandomText' hd ]
]
------------------------------------------------------------------------
...
...
@@ -122,21 +122,22 @@ docButton (Button b) = a [ className "btn btn-outline-primary btn-sm spacing-cla
jumboTitle :: LandingData -> Boolean -> ReactElement
jumboTitle (LandingData hd) b = div jumbo
[ div [className "row" ]
[ div [className "col-md-4 content"]
[ h1 [] [ text hd.name]
, p [] [ text hd.signature ]
]
, div [className "col-md-4 content"] []
, div [ className "col-md-4 content"]
[ p [ className "right" ]
[ div [ className "col-md-8 content"]
[ p [ className "left" ]
[ div [_id "logo-designed" ]
[ img [ src "images/logo.png"
, title hd.logoTitle
]
[]
[ img [ src "images/logo.png"
, title hd.logoTitle
] []
]
]
]
, div [ className "col-md-4 content"]
[ img [ src "images/Gargantextuel.jpg"
, _id "funnyimg"
, title hd.imageTitle
]
[]
]
]
]
]
]
where
...
...
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