WIP: Implement wordWrap

flake.nix

@@ -62,8 +62,7 @@
         devShells.default = haskellPackages.shellFor {
           inherit (self.checks.${system}.pre-commit-check) shellHook;
 
-          packages = _:
+          packages = _: [ self.packages.${system}.default ];
-            pkgs.lib.filter (x: x != null) [ self.packages.${system}.default ];
 
           withHoogle = true;
 

src/HCat/Internal.hs

@@ -1,6 +1,8 @@
 -- | Internal module in order to facilitate testability.
 module HCat.Internal where
 
+import Data.Text (Text)
+
 -- | @parseArgs@ takes a list of strings and returns a single FilePath if there was exactly one element.
 --
 -- >>> parseArgs ["foo"]
@@ -28,3 +30,11 @@ chunksOf n xs@(_ : _)
   | otherwise =
       let (chunk, rest) = splitAt n xs
        in chunk : chunksOf n rest
+
+-- |  @wordWrap@ splits the given Text if it is longer than the given margin.
+--
+-- >>> :set -XOverloadedStrings
+-- >>> wordWrap 3 $ "abcdef"
+-- ["abc", "def"]
+wordWrap :: Int -> Text -> [Text]
+wordWrap = undefined