diff --git a/CHANGELOG.md b/CHANGELOG.md index 803442a..d322510 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -11,6 +11,7 @@ New features: Bugfixes: Other improvements: +- Fix warnings revealed by v0.14.1 PS release (#85 by @JordanMartinez) ## [v6.0.0](https://github.com/purescript/purescript-foreign/releases/tag/v6.0.0) - 2021-02-26 diff --git a/src/Foreign/Index.purs b/src/Foreign/Index.purs index daff17b..5e4150a 100644 --- a/src/Foreign/Index.purs +++ b/src/Foreign/Index.purs @@ -55,7 +55,7 @@ hasOwnPropertyImpl :: forall k. k -> Foreign -> Boolean hasOwnPropertyImpl _ value | isNull value = false hasOwnPropertyImpl _ value | isUndefined value = false hasOwnPropertyImpl p value | typeOf value == "object" || typeOf value == "function" = runFn2 unsafeHasOwnProperty p value -hasOwnPropertyImpl _ value = false +hasOwnPropertyImpl _ _ = false foreign import unsafeHasProperty :: forall k. Fn2 k Foreign Boolean @@ -63,7 +63,7 @@ hasPropertyImpl :: forall k. k -> Foreign -> Boolean hasPropertyImpl _ value | isNull value = false hasPropertyImpl _ value | isUndefined value = false hasPropertyImpl p value | typeOf value == "object" || typeOf value == "function" = runFn2 unsafeHasProperty p value -hasPropertyImpl _ value = false +hasPropertyImpl _ _ = false instance indexString :: Monad m => Index String m where index = flip readProp