diff --git a/WebSharper.UI/Attr.Client.fs b/WebSharper.UI/Attr.Client.fs index 696a1b3..57f9506 100644 --- a/WebSharper.UI/Attr.Client.fs +++ b/WebSharper.UI/Attr.Client.fs @@ -348,7 +348,7 @@ module BindVar = () // This should do nothing, as we should not override the values from the input let FileGetUnchecked : Get = fun el -> let files : FileList = el?files - [| for i in 1..files.Length do yield files.Item(i) |] |> Some + [| for i in 0..files.Length-1 do yield files.Item(i) |] |> Some let FileApplyUnchecked : Apply = ApplyValue FileGetUnchecked FileSetUnchecked