anchor.diff:      /// Generate <div class="dropdown-content"></div>
       let content (options: GenericOption list) children =
           let opts = genericParse options
  -        let classes = Helpers.classes Classes.Content [opts.CustomClass] []
  +        let classes = Helpers.classes Classes.Content (opts.CustomClass::opts.Modifiers) []
           div (classes::opts.Props) children
   
       /// Generate <div class="dropdown-divider"></div>
       let divider (options: GenericOption list) =
           let opts = genericParse options
  -        let classes = Helpers.classes Classes.Divider [opts.CustomClass] []
  +        let classes = Helpers.classes Classes.Divider (opts.CustomClass::opts.Modifiers) []
           hr (classes::opts.Props)
   
       module Item =
  
positive.code:                 | IsActive state -> { result with IsActive = state }
                  | Props props -> { result with Props = props }
                  | CustomClass customClass -> { result with CustomClass = Some customClass }
  
              let opts = options |> List.fold parseOptions Options.Empty
              let classes =
                  [ Classes.Item.State.IsActive, opts.IsActive ]
                  |> Helpers.classes Classes.Item.Container [opts.CustomClass]
  
              element (classes::opts.Props) children
  
  
negative.code:             | IsActive of bool
              | Props of IHTMLProp list
              | CustomClass of string
              | Modifiers of IModifier list
  
          type internal Options =
              { Props : IHTMLProp list
                IsActive : bool
                CustomClass : string option
                Modifiers : string option list }
  
              static member Empty =
                  { Props = []
                    IsActive = false
                    CustomClass = None
                    Modifiers = [] }
  
          let internal item element (options: Option list) children =
              let parseOptions (result : Options) =
  