From 71aba3cd66c59980a30dd74776096b149b5ae240 Mon Sep 17 00:00:00 2001 From: Filip Haglund Date: Sat, 24 Dec 2022 00:09:45 +0100 Subject: [PATCH] Update CodePoints.purs --- src/Data/String/CodePoints.purs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/String/CodePoints.purs b/src/Data/String/CodePoints.purs index 11a3559..d041ca1 100644 --- a/src/Data/String/CodePoints.purs +++ b/src/Data/String/CodePoints.purs @@ -319,7 +319,7 @@ lastIndexOf' p i s = -- | ``` -- | take :: Int -> String -> String -take = _take takeFallback +take i = _take takeFallback (if i > 0 then i else 0) foreign import _take :: (Int -> String -> String) -> Int -> String -> String