diff options
| author | tv <tv@krebsco.de> | 2026-03-19 22:09:58 +0100 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2026-03-19 22:39:41 +0100 |
| commit | fdeb641fde5f82c3ad617c5c801ab40955fe62af (patch) | |
| tree | 3b741944473738fb79f4f50943b3975c20a6e9a1 /src/Much/Utils.hs | |
| parent | 131e4f0ccf655095d13b05f69acdaa1c22b9e6d4 (diff) | |
blessings: 2 -> 3
Diffstat (limited to 'src/Much/Utils.hs')
| -rw-r--r-- | src/Much/Utils.hs | 5 |
1 files changed, 0 insertions, 5 deletions
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 |