Module `Icons.Make`

Build an icon module on top of an Eliom HTML implementation (Eliom.Content.Html.F or Eliom.Content.Html.D).

Parameters

module A : Eliom.Content.Html.T

Signature

type 'a elt = 'a A.elt

type 'a attrib = 'a A.attrib

val icon : 
  string list ->
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

icon classes () is an empty <i> element whose CSS classes are "ot-icon" followed by classes. The optional ?a argument lets the caller add extra attributes (typically more classes). It comes last so that the predefined icons below can be partially applied and still expose ?a.

val user : ?a:Html_types.i_attrib attrib list -> unit -> [> Html_types.i ] elt

Predefined icon for a user / profile glyph (CSS class ot-icon-user).

val plus : ?a:Html_types.i_attrib attrib list -> unit -> [> Html_types.i ] elt

Predefined "plus" / add icon (CSS class ot-plus).

val spinner : 
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

Animated spinner icon (CSS classes ot-icon-spinner ot-icon-animation-spinning).

val shutdown : 
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

Shutdown / power icon (CSS class ot-icon-power).

val config : 
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

Configuration / gear icon (CSS class ot-icon-gear).

val signout : 
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

Sign out / logout icon (CSS class ot-icon-sign-out).

val close : ?a:Html_types.i_attrib attrib list -> unit -> [> Html_types.i ] elt

Close icon (CSS class ot-icon-close).

val question : 
  ?a:Html_types.i_attrib attrib list ->
  unit ->
  [> Html_types.i ] elt

Question mark / help icon (CSS class ot-icon-question).