Fix an error message

1 files changed, 1 insertions, 1 deletions

diff --git a/Pancake.hs b/Pancake.hs
index 914c242..f950188 100644
--- a/Pancake.hs
+++ b/Pancake.hs
@@ -123,7 +123,7 @@ loadDocument sType rawURI = do
             handle
               (\(e :: SomeException) ->
                  putErrLn (concat ["Failed to open `", tmpPath, "` with `"
-                                  , cmd, "`: ", show e])) $ do
+                                  , ev, "`: ", show e])) $ do
               createDirectoryIfMissing True dir
               BS.writeFile tmpPath rawDoc
               curEnv <- getEnvironment