From fdeb641fde5f82c3ad617c5c801ab40955fe62af Mon Sep 17 00:00:00 2001 From: tv Date: Thu, 19 Mar 2026 22:09:58 +0100 Subject: blessings: 2 -> 3 --- src/Much/Utils.hs | 5 ----- 1 file changed, 5 deletions(-) (limited to 'src/Much/Utils.hs') diff --git a/src/Much/Utils.hs b/src/Much/Utils.hs index 80615fc..df23c82 100644 --- a/src/Much/Utils.hs +++ b/src/Much/Utils.hs @@ -10,11 +10,6 @@ withTempFile tmpdir template = bracket (openTempFile tmpdir template) (removeFile . fst) -mintercalate :: Monoid b => b -> [b] -> b -mintercalate c (h:t) = foldl (\acc x -> acc <> c <> x) h t -mintercalate _ [] = mempty - - padl :: Int -> a -> [a] -> [a] padl n c s = if length s < n -- cgit v1.2.3