1 files changed, 4 insertions, 4 deletions

diff --git a/src/Error.hs b/src/Error.hs
index 5ba48bf..bfc8d14 100644
--- a/src/Error.hs
+++ b/src/Error.hs
@@ -18,10 +18,10 @@ unwordsList :: [Expr] -> String
 unwordsList = unwords . map show
 
 instance Show LispError where
-    show (Parse e)        = "Parser Error: " ++ show e
-    show (BadForm s expr) = "Bad Form: " ++ s ++ ": " ++ show expr
-    show (ArgCount n es) = "Invalid arity, expected " ++ show n ++ ", got value(s): " ++ unwordsList es
-    show (UnknownFunction fn) = "Cannot apply function: " ++ fn
+    show (Parse e)              = "Parser Error: " ++ show e
+    show (BadForm s expr)       = "Bad Form: " ++ s ++ ": " ++ show expr
+    show (ArgCount n es)        = "Invalid arity, expected " ++ show n ++ ", got value(s): " ++ unwordsList es
+    show (UnknownFunction fn)   = "Cannot apply function: " ++ fn
     show (TypeMismatch msg got) = "Type mismatch, expected " ++ msg ++ ", got: " ++ show got
 
 type LispResult = Either LispError