Yesod.Form.Summernote

Provide the user with the Summernote rich text editor.

NOTES:

Editor fields have hidden textareas which are updated automatically when editor contents changes.

summerForm :: Form HtmlComment
summerForm = renderBootstrap3 BootstrapBasicForm $ HtmlComment
  <$> areq (snHtmlFieldCustomized "{toolbar:false}") "Title" Nothing
  <*> areq snHtmlField "Comment" Nothing

Documentation

class Yesod a => YesodSummernote a where

Methods

urlBootstrapCss :: a -> Either (Route a) Text

Bootstrap 3 CSS location.

urlBootstrapScript :: a -> Either (Route a) Text

Bootstrap 3 library location.

urlJQueryScript :: a -> Either (Route a) Text

JQuery library location.

urlSummernoteCss :: a -> Either (Route a) Text

Summernote Editor CSS location.

urlSummernoteScript :: a -> Either (Route a) Text

Summernote Editor library location.

summernoteLoadLibrariesAndCss :: a -> Bool

Should required libraries and scripts be added in DOM tree? This property required to control script loading. In case if you load JQuery, Bootstrap, and Summernote libraries and CSS in head it is not necessary to load them second time, moreover this could bring some issues, for example if JQuery is loaded second time it could brake AJAX configuration from defaultCsrfMiddleware. Setting this to True could be useful in case you need single instance of editor on some pages only.

snHtmlField :: (YesodSummernote site, Monad m) => Field (HandlerT site m) Html

Summernote editor field with default settings.

snHtmlFieldCustomized :: (YesodSummernote site, Monad m) => String -> Field (HandlerT site m) Html

Customizable Summernote editor field.

cfg argument should be a JSON formatted string, it will be passed to $.summernote() call as first argument.

snHtmlFieldCustomized "{ height: 150, codemirror: { theme:monokai } }"