wip, debug

2024-05-14 05:57:57 +03:00 · 2024-05-14 05:57:57 +03:00 · 854875eee5
parent d31d0241f7
commit 854875eee5
1 changed files with 1 additions and 0 deletions
--- a/fixme-new/lib/Fixme/Run.hs
+++ b/fixme-new/lib/Fixme/Run.hs
@ -726,6 +726,7 @@ run what = do
        ListVal [SymbolVal "play-log-file", StringLike fn] -> do
          debug $ yellow "play-log-file" <+> pretty fn
          -- FIXME: just-for-in-case-sanitize-input
+          --   $workflow: wip
          what <- try @_ @IOException (liftIO $ readFile fn)
                    <&> fromRight mempty
                    <&> parseTop