Text between: Difference between revisions
→{{header|Haskell}}: Tidying - used fromMaybe in lieu of case
(Fixed bug in Python textbetween start offset when using "start" delimiter) |
(→{{header|Haskell}}: Tidying - used fromMaybe in lieu of case) |
||
Line 827:
<lang Haskell>import Data.Text (Text, pack, unpack, breakOn, stripPrefix)
import Data.List (intercalate)
import Data.Maybe (fromMaybe)
import Control.Arrow ((***))
-- TEXT BETWEEN -----------------------------------------------------------
Line 834 ⟶ 836:
let retain sub part delim t =
either (Just . const t) (sub $ part . flip breakOn t) delim
in fromMaybe
▲ _ -> pack []
-- TESTS ------------------------------------------------------------------
| |||