Module

Module Atom_feed

Documentation

Module Atom_feed : sig end

Everything we need to make an atom feed.

type uri = Xml.uri

type lang = string

type base = uri

type ncname = string

type dateConstruct = string

type emailAddress = string

type mediaType = string

type length = int

type href = Xml.uri

type hrefLang = string

type rel = string

type ltitle = string

type scheme = string

type label = string

type term = string

type metaAttr = [ `Base of base | `Lang of lang ]

Common optional attributes

type personConstruct = [ `Email of emailAddress | `Uri of uri ]

Children tags allowed for the author and contributor tags

type author

type contributor

type generator

type id

type icon

type category

type link

type logo

type published

type updated

type source

type entry

type feed

type content

type textConstruct

type linkOAttr = [ `Base of base | `Hrefl of hrefLang | `Lang of lang | `Length of length | `Medtype of mediaType | `Rel of rel | `Title of ltitle | `Type of string ]

Children tags allowed for the link tag

type sourceOAttr = [ `Authors of author list | `Base of base | `Cats of category list | `Contribs of contributor list | `Gen of generator | `Icon of icon | `Lang of lang | `Links of link list | `Logo of logo | `Rights of textConstruct | `Sub of textConstruct ]

Children tags allowed for the source tag

type entryOAttr = [ `Authors of author list | `Base of base | `Cats of category list | `Content of content | `Contribs of contributor list | `Lang of lang | `Links of link list | `Pub of published | `Rights of textConstruct | `Source of source | `Sum of textConstruct ]

Children tags allowed for the entry tag

type feedOAttr = [ `Authors of author list | `Base of base | `Cats of category list | `Contribs of contributor list | `Gen of generator | `Icon of icon | `Lang of lang | `Links of link list | `Logo of logo | `Rights of textConstruct | `Sub of textConstruct ]

Children tags allowed for the feed tag

val xml_of_feed : feed -> Xml.elt

val inlineC : ?meta:[> metaAttr ] list -> ?html:bool -> string list -> [> `Content of content ]

An inline text or html content

val xhtmlC : ?meta:[> metaAttr ] list -> [ `A | `Abbr | `Acronym | `Address | `B | `Bdo | `Big | `Blockquote | `Br | `Button | `Cite | `Code | `Del | `Dfn | `Div | `Dl | `Em | `Fieldset | `Form | `H1 | `H2 | `H3 | `H4 | `H5 | `H6 | `Hr | `I | `Iframe | `Img | `Input | `Ins | `Kbd | `Label | `Map | `Noscript | `Object | `Ol | `P | `PCDATA | `Pre | `Q | `Ruby_complex | `Ruby_simple1 | `Ruby_simple2 | `Samp | `Script | `Select | `Small | `Span | `Strong | `Sub | `Sup | `Table | `Textarea | `Tt | `Ul | `Var ] Xhtml.M.elt list -> [> `Content of content ]

An xhtml content, embedded in a div

val html5C : ?meta:[> metaAttr ] list -> [ `A of Html5_types.flow5_without_interactive | `Abbr | `Address | `Article | `Aside | `Audio of Html5_types.flow5_without_media | `Audio_interactive of Html5_types.flow5_without_media | `B | `Bdo | `Blockquote | `Br | `Button | `Canvas of Html5_types.flow5 | `Cite | `Code | `Command | `Datalist | `Del of Html5_types.flow5 | `Details | `Dfn | `Div | `Dl | `Em | `Embed | `Fieldset | `Figure | `Footer | `Form | `H1 | `H2 | `H3 | `H4 | `H5 | `H6 | `Header | `Hgroup | `Hr | `I | `Iframe | `Img | `Img_interactive | `Input | `Ins of Html5_types.flow5 | `Kbd | `Keygen | `Label | `Map of Html5_types.flow5 | `Mark | `Menu | `Meter | `Nav | `Noscript of Html5_types.flow5_without_noscript | `Object of Html5_types.flow5 | `Object_interactive of Html5_types.flow5 | `Ol | `Output | `P | `PCDATA | `Pre | `Progress | `Q | `Ruby | `Samp | `Script | `Section | `Select | `Small | `Span | `Strong | `Style | `Sub | `Sup | `Svg | `Table | `Textarea | `Time | `U | `Ul | `Var | `Video of Html5_types.flow5_without_media | `Video_interactive of Html5_types.flow5_without_media | `Wbr ] Eliom_content.Html5.elt list -> [> `Content of content ]

An html5 content, embedded in a div

val inlineOtherC : ?meta:[> metaAttr ] list -> string * Xml.elt list -> [> `Content of content ]

Inline content from another kind

val outOfLineC : ?meta:[> metaAttr ] list -> string * uri -> [> `Content of content ]

Every other content

val plain : ?meta:[> metaAttr ] list -> ?html:bool -> string -> textConstruct

Plain text construct

val xhtml : ?meta:[> metaAttr ] list -> [ `A | `Abbr | `Acronym | `Address | `B | `Bdo | `Big | `Blockquote | `Br | `Button | `Cite | `Code | `Del | `Dfn | `Div | `Dl | `Em | `Fieldset | `Form | `H1 | `H2 | `H3 | `H4 | `H5 | `H6 | `Hr | `I | `Iframe | `Img | `Input | `Ins | `Kbd | `Label | `Map | `Noscript | `Object | `Ol | `P | `PCDATA | `Pre | `Q | `Ruby_complex | `Ruby_simple1 | `Ruby_simple2 | `Samp | `Script | `Select | `Small | `Span | `Strong | `Sub | `Sup | `Table | `Textarea | `Tt | `Ul | `Var ] Xhtml.M.elt list -> textConstruct

XHTML text construct

val html5 : ?meta:[> metaAttr ] list -> [ `A of Html5_types.flow5_without_interactive | `Abbr | `Address | `Article | `Aside | `Audio of Html5_types.flow5_without_media | `Audio_interactive of Html5_types.flow5_without_media | `B | `Bdo | `Blockquote | `Br | `Button | `Canvas of Html5_types.flow5 | `Cite | `Code | `Command | `Datalist | `Del of Html5_types.flow5 | `Details | `Dfn | `Div | `Dl | `Em | `Embed | `Fieldset | `Figure | `Footer | `Form | `H1 | `H2 | `H3 | `H4 | `H5 | `H6 | `Header | `Hgroup | `Hr | `I | `Iframe | `Img | `Img_interactive | `Input | `Ins of Html5_types.flow5 | `Kbd | `Keygen | `Label | `Map of Html5_types.flow5 | `Mark | `Menu | `Meter | `Nav | `Noscript of Html5_types.flow5_without_noscript | `Object of Html5_types.flow5 | `Object_interactive of Html5_types.flow5 | `Ol | `Output | `P | `PCDATA | `Pre | `Progress | `Q | `Ruby | `Samp | `Script | `Section | `Select | `Small | `Span | `Strong | `Style | `Sub | `Sup | `Svg | `Table | `Textarea | `Time | `U | `Ul | `Var | `Video of Html5_types.flow5_without_media | `Video_interactive of Html5_types.flow5_without_media | `Wbr ] Eliom_content.Html5.elt list -> textConstruct

HTML5 text construct

val rights : textConstruct -> [> `Rights of textConstruct ]

Rights tag

val subtitle : textConstruct -> [> `Sub of textConstruct ]

Subtitle tag

val summary : textConstruct -> [> `Sum of textConstruct ]

Summary tag

val feed : updated:CalendarLib.Calendar.t -> id:uri -> title:textConstruct -> ?fields:[> feedOAttr ] list -> entry list -> feed

Feed tag

val entry : updated:CalendarLib.Calendar.t -> id:uri -> title:textConstruct -> [> entryOAttr ] list -> entry

Entry tag

val source : updated:CalendarLib.Calendar.t -> id:uri -> title:textConstruct -> [> sourceOAttr ] list -> [> `Source of source ]

Source tag

val link : ?elt:[> linkOAttr ] list -> href -> link

Link tag

val links : link list -> [> `Links of link list ]

We need a list of links, this is only a converter from link list to `Links

val email : string -> [> `Email of string ]

email tag

val uri : uri -> [> `Uri of uri ]

uri tag, basically, simply a converter

val author : ?elt:[> personConstruct ] list -> string -> author

author tag

val authors : author list -> [> `Authors of author list ]

We need a list of authors, this is only a converter from author list to `Authors

val contributor : ?elt:[> personConstruct ] list -> string -> contributor

contributor tag

val contributors : contributor list -> [> `Contribs of contributor list ]

We need a list of contributors, this is only a converter from contributor list to `Contributors

val icon : uri -> [> `Icon of icon ]

icon tag, basically, simply a converter

val logo : uri -> [> `Logo of logo ]

logo tag, basically, simply a converter

val category : ?meta:[> metaAttr ] list -> ?scheme:scheme -> ?label:label -> term -> Xml.elt list -> category

category tag

val categories : category list -> [> `Cats of category list ]

We need a list of categories, this is only a converter from category list to `Categories

val published : CalendarLib.Calendar.t -> [> `Pub of published ]

val insert_hub_links : uri list -> feed -> feed

Technically not used elsewhere than in eliom_feed.ml, since the links tags related to each hub are added when registering the feed.