Skip to content

P
purescript-gargantext
Commit 1b26fbba authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[DOC] adding comments.

parent 7588c9a6
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 1 deletion
src/Navigation.purs
View file @ 1b26fbba
...@@ -240,7 +240,7 @@ divDropdownLeft = ul [className "nav navbar-nav"] ...@@ -240,7 +240,7 @@ divDropdownLeft = ul [className "nav navbar-nav"]
] ]
-- WYSIWYG = Pure React -- | WYSIWYG example in Pure React ?
divLeftdropdownElements :: Array ReactElement divLeftdropdownElements :: Array ReactElement
divLeftdropdownElements = menu divLeftdropdownElements = menu
[ -- =========================================================== [ -- ===========================================================
...@@ -276,6 +276,7 @@ divLeftdropdownElements = menu ...@@ -276,6 +276,7 @@ divLeftdropdownElements = menu
] ]
] -- =========================================================== ] -- ===========================================================
-- | Menu in the sidebar, syntactic sugar
menu :: Array (Array LiNav) -> Array ReactElement menu :: Array (Array LiNav) -> Array ReactElement
menu ns = intercalate divider $ map (map liNav) ns menu ns = intercalate divider $ map (map liNav) ns
where where
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment