X-Git-Url: https://glassweightruler.freedombox.rocks/gitweb/xdg-ninja.git/blobdiff_plain/932a10db39f29909cb93b9afce14928dcc5e8326..refs/heads/arch_wiki_scrape:/lib/Output.hs diff --git a/lib/Output.hs b/lib/Output.hs index ddc486a..ec66fce 100644 --- a/lib/Output.hs +++ b/lib/Output.hs @@ -1,13 +1,13 @@ module Output where -import qualified Data.Text as T -import Data.Char (isSpace) -import Data.Text.ANSI +import Data.Char (isSpace) +import qualified Data.Text as T +import Data.Text.ANSI import Data.UUID import Data.UUID.V4 +import Program import System.Exit import System.Process -import Program getFilename :: IO String getFilename = do @@ -44,7 +44,7 @@ log mode name filename help = case mode of SUCS -> putStrLn (line green name filename) HELP -> do md <- case (all isSpace help) of - True -> renderMarkdown "_No help available._" + True -> renderMarkdown "_No help available._" False -> renderMarkdown help putStr md