diff options
author | Alexander Foremny <aforemny@posteo.de> | 2023-12-15 03:13:39 +0100 |
---|---|---|
committer | Alexander Foremny <aforemny@posteo.de> | 2023-12-15 03:22:40 +0100 |
commit | d370389451094804c3a642dc42426d210f1d49c1 (patch) | |
tree | 79f32c72f73cdc1fea1285091a7e41b5c79adc05 /app/Render.hs | |
parent | 01a14ef0d873e99cf8d284d2bb07ddf2389a6e4c (diff) |
feat: add `search` command
Diffstat (limited to 'app/Render.hs')
-rw-r--r-- | app/Render.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/app/Render.hs b/app/Render.hs index f4293c2..907ef15 100644 --- a/app/Render.hs +++ b/app/Render.hs @@ -12,6 +12,7 @@ module Render (<<<), (===), styled, + renderAsText, -- * Reporting styles Detailed (..), @@ -46,6 +47,12 @@ class Render a where default render :: Pretty a => a -> Doc AnsiStyle render = pretty +renderAsString :: Render a => a -> String +renderAsString = show . render + +renderAsText :: Render a => a -> T.Text +renderAsText = T.pack . renderAsString + instance Render (Doc AnsiStyle) where render = id |