| Copyright | (c) Michael Mounteney, 2017 |
|---|---|
| License | BSD 3 clause |
| Maintainer | the project name, all lower case, at landcroft dot com |
| Stability | experimental |
| Portability | undefined |
| Safe Haskell | None |
| Language | Haskell2010 |
PresentHTML
Description
Uses the CSS3 flex solution at http://stackoverflow.com/questions/90178/make-a-div-fill-the-height-of-the-remaining-screen-space. If we ever have to support older browsers, https://www.google.com.au/search?q=html+fill+rest such as http://stackoverflow.com/questions/21222663/make-nested-div-stretch-to-100-of-remaining-container-div-height/.
- toHTMLdoc :: Document -> Handler Html
- documentHTMLNotice :: Text -> Document
- documentXHTML :: Maybe Text -> Text -> [Node] -> [Node] -> Document
- gradeButtons :: [Node]
- okButton :: [Node]
Documentation
toHTMLdoc :: Document -> Handler Html Source #
Convert an XHTML document into XML and lift it into the Handler Monad, so it can be displayed.
documentHTMLNotice :: Text -> Document Source #
Convert a string (representing a notice or information for the user) into a Document.
documentXHTML :: Maybe Text -> Text -> [Node] -> [Node] -> Document Source #
Compose a Document with optional CSS, bottom buttons and a title.
gradeButtons :: [Node] Source #
Buttons 0 to 9 for scoring.
The label must be synchronised with text in ScorePost.