Skip to content

Commit

Permalink
Switched the Custom to use tuple parames. Merged remote-tracking bran…
Browse files Browse the repository at this point in the history
…ch 'upstream/master'

@ Conflicts:
@	src/Fable.React/Fable.Helpers.React.fs
  • Loading branch information
MecuSorin committed Feb 6, 2018
2 parents 18f97e8 + 084ec4c commit cc94bb3
Showing 1 changed file with 8 additions and 12 deletions.
20 changes: 8 additions & 12 deletions src/Fable.React/Fable.Helpers.React.fs
Original file line number Diff line number Diff line change
Expand Up @@ -5,9 +5,6 @@ open Fable.Core.JsInterop
open Fable.Import

module Props =
type ICSSProp =
interface end

type IProp =
interface end

Expand Down Expand Up @@ -245,12 +242,6 @@ module Props =
| Unselectable of bool
interface IHTMLProp

let inline Style (css: ICSSProp list): HTMLAttr =
!!("style", keyValueList CaseRules.LowerFirst css)

let inline Data(key: string, value: obj): IHTMLProp =
!!("data-" + key, value)

type SVGAttr =
| ClipPath of string
| Cx of obj
Expand Down Expand Up @@ -717,9 +708,14 @@ module Props =
| WritingMode of obj
| ZIndex of obj
| Zoom of obj
interface ICSSProp
/// If you are searching for a way to provide a value not supported by this DSL then use something like: CSSProp.Custom "align-content" "center"
static member inline Custom (key: string) (value: obj) : ICSSProp = !!(key, value)
/// If you are searching for a way to provide a value not supported by this DSL then use something like: CSSProp.Custom ("align-content", "center")
static member inline Custom (key: string, value: obj) : CSSProp = !!(key, value)

let inline Style (css: CSSProp list): HTMLAttr =
!!("style", keyValueList CaseRules.LowerFirst css)

let inline Data(key: string, value: obj): IHTMLProp =
!!("data-" + key, value)

open Props
open Fable.Import.React
Expand Down

0 comments on commit cc94bb3

Please sign in to comment.