Add type constraint for commands

elmish · Aug 30, 2022 · ec21987 · ec21987
1 parent 9ee0424
commit ec21987
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Elmish.WPF/BindingData.fs b/src/Elmish.WPF/BindingData.fs
@@ -2,6 +2,7 @@ namespace Elmish.WPF
 
 open System.Collections.ObjectModel
 open System.Windows
+open System.Windows.Input
 
 open Elmish
 
@@ -549,7 +550,7 @@ module internal BindingData =
 
   module Cmd =
 
-    let createWithParam exec canExec autoRequery =
+    let createWithParam exec canExec autoRequery : BindingData<'model, 'msg, ICommand> =
       { Exec = exec
         CanExec = canExec
         AutoRequery = autoRequery }