X-Git-Url: https://git.xandkar.net/?p=hope.git;a=blobdiff_plain;f=src%2Fhope_fun.erl;h=c2443cee8b7efb721098b69a9dd6268eb3bfac68;hp=1f8669cfe536903c140fd618233662bc94a2e7e0;hb=a3173cf2c4cd3aa3b7da033cac6b2d9e9ccd492a;hpb=87160c0adda38ad3c307cc4072a03ab606f359ef diff --git a/src/hope_fun.erl b/src/hope_fun.erl index 1f8669c..c2443ce 100644 --- a/src/hope_fun.erl +++ b/src/hope_fun.erl @@ -13,7 +13,7 @@ id(X) -> -spec curry(fun()) -> fun(). curry(F) -> - {some, Arity} = hope_kv_list:get(erlang:fun_info(F), arity), + {arity, Arity} = erlang:fun_info(F, arity), curry(F, [], Arity). -spec curry(fun(), list(), integer()) ->