Handler.Notes

Documentation

getNotesR :: UserNameP -> Handler Html

getNoteR :: UserNameP -> NtSlug -> Handler Html

getAddNoteSlimViewR :: Handler Html

getAddNoteViewR :: UserNameP -> Handler Html

deleteDeleteNoteR :: Int64 -> Handler Html

postAddNoteR :: Handler Text

requireResource :: UserId -> Key Note -> DBM Handler Note

_handleFormSuccess :: NoteForm -> Handler (UpsertResult (Key Note))

data NoteForm

Constructors

NoteForm

Fields

• _id :: Maybe Int64
• _slug :: Maybe NtSlug
• _title :: Maybe Text
• _text :: Maybe Textarea
• _isMarkdown :: Maybe Bool
• _shared :: Maybe Bool
• _created :: Maybe UTCTimeStr
• _updated :: Maybe UTCTimeStr

Instances

FromJSON NoteForm

Defined in Handler.Notes

Methods

parseJSON :: Value -> Parser NoteForm

parseJSONList :: Value -> Parser [NoteForm]

omittedField :: Maybe NoteForm

ToJSON NoteForm

Defined in Handler.Notes

Methods

toJSON :: NoteForm -> Value

toEncoding :: NoteForm -> Encoding

toJSONList :: [NoteForm] -> Value

toEncodingList :: [NoteForm] -> Encoding

omitField :: NoteForm -> Bool

Generic NoteForm

Defined in Handler.Notes

Associated Types

type Rep NoteForm :: Type -> Type

Methods

from :: NoteForm -> Rep NoteForm x

to :: Rep NoteForm x -> NoteForm

Read NoteForm

Defined in Handler.Notes

Methods

readsPrec :: Int -> ReadS NoteForm

readList :: ReadS [NoteForm]

readPrec :: ReadPrec NoteForm

readListPrec :: ReadPrec [NoteForm]

Show NoteForm

Defined in Handler.Notes

Methods

showsPrec :: Int -> NoteForm -> ShowS

show :: NoteForm -> String

showList :: [NoteForm] -> ShowS

Eq NoteForm

Defined in Handler.Notes

Methods

(==) :: NoteForm -> NoteForm -> Bool

(/=) :: NoteForm -> NoteForm -> Bool

type Rep NoteForm

Defined in Handler.Notes

type Rep NoteForm = D1 ('MetaData "NoteForm" "Handler.Notes" "espial-0.0.20-EcVaTGJvbgfEg2qawed6qP" 'False) (C1 ('MetaCons "NoteForm" 'PrefixI 'True) (((S1 ('MetaSel ('Just "_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int64)) :*: S1 ('MetaSel ('Just "_slug") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe NtSlug))) :*: (S1 ('MetaSel ('Just "_title") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "_text") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Textarea)))) :*: ((S1 ('MetaSel ('Just "_isMarkdown") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "_shared") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))) :*: (S1 ('MetaSel ('Just "_created") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTimeStr)) :*: S1 ('MetaSel ('Just "_updated") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTimeStr))))))

gNoteFormOptions :: Options

noteFormUrl :: Handler NoteForm

_toNote :: UserId -> NoteForm -> IO Note

noteToRssEntry :: (Route App -> Text) -> UserNameP -> Entity Note -> FeedEntry Text

getNotesFeedR :: UserNameP -> Handler RepRss