From d370389451094804c3a642dc42426d210f1d49c1 Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Fri, 15 Dec 2023 03:13:39 +0100
Subject: feat: add `search` command

---
 app/Render.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'app/Render.hs')

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
 
-- 
cgit v1.2.3