From 2d693770d7fe8d8ee73346e374b9bc07c8a617a1 Mon Sep 17 00:00:00 2001
From: "Yann Esposito (Yogsototh)" <yann.esposito@gmail.com>
Date: Sat, 4 Mar 2017 21:28:20 +0100
Subject: [PATCH] better error message

---
 src/Lish/Eval.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/Lish/Eval.hs b/src/Lish/Eval.hs
index 894421f..77e9b64 100644
--- a/src/Lish/Eval.hs
+++ b/src/Lish/Eval.hs
@@ -109,7 +109,9 @@ executeShell (Lambda args) = do
                                                               , std_out = CreatePipe }
       case result of
         Right (_, mb_hout, _, _) -> return $ Stream mb_hout
-        Left ex                  -> shellErr ("[shell 1/2] " <> (show (Lambda args)) <> "\n[shell 2/2] " <> show ex)
+        Left ex                  -> shellErr ("Unknow fn or cmd: "
+                                              <> toS cmd
+                                              <> "\n" <> show ex)
     _ -> shellErr "empty lambda!"
   where
     trySh :: IO a -> IO (Either IOException a)