From 975304097cbc7d0657fa5be1e8b40612bd7f7506 Mon Sep 17 00:00:00 2001
From: Timothy Clem <timothy.clem@gmail.com>
Date: Tue, 25 Apr 2017 09:07:51 -0700
Subject: [PATCH] Remove TODO and leave readFile behavior alone for now

---
 src/Command/Files.hs | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/Command/Files.hs b/src/Command/Files.hs
index 7ca23ca97..0f24daa98 100644
--- a/src/Command/Files.hs
+++ b/src/Command/Files.hs
@@ -14,9 +14,6 @@ import qualified Data.Text.ICU.Detect as Detect
 -- | Read a file to a SourceBlob, transcoding to UTF-8 along the way.
 readFile :: FilePath -> IO SourceBlob
 readFile path = do
-  -- source <- readFile' path
-  -- pure $ sourceBlob source path
-  -- TODO: Do we want to swallow IOExceptions for files that don't exist? I'm not sure this is a good idea.
   source <- (Just <$> readFile' path) `catch` (const (pure Nothing) :: IOException -> IO (Maybe Source))
   pure $ fromMaybe (emptySourceBlob path) (flip sourceBlob path <$> source)
   where