anchor.diff:              | Current of bool
               | CustomClass of string
               | Props of IHTMLProp list
  +            | Modifiers of IModifier list
   
           type internal Options =
               { IsCurrent : bool
                 CustomClass : string option
  -              Props : IHTMLProp list }
  +              Props : IHTMLProp list
  +              Modifiers : string option list }
   
               static member Empty =
                   { IsCurrent = false
                     CustomClass = None
  -                  Props = [] }
  +                  Props = []
  +                  Modifiers = [] }
   
       /// Generate <nav class="pagination"></nav>
       let pagination (options: Option list) children =
  
positive.code:     /// Generate <ul class="pagination-list"></ul>
      let list (options: GenericOption list) children =
          let opts = genericParse options
          let classes = Helpers.classes Classes.List [opts.CustomClass] []
          ul (classes::opts.Props) children
  
negative.code:     /// Generate <a class="pagination-previous"></a>
      let previous (options: GenericOption list) children =
          let opts = genericParse options
          let classes = Helpers.classes Classes.Previous (opts.CustomClass::opts.Modifiers) []
          a (classes::opts.Props) children
  
      /// Generate <a class="pagination-next"></a>
      let next (options: GenericOption list) children =
          let opts = genericParse options
          let classes = Helpers.classes Classes.Next (opts.CustomClass::opts.Modifiers) []
          a (classes::opts.Props) children
  
      /// Generate <li><a class="pagination-link"></a></li>
  