1 files changed, 1 insertions, 1 deletions

diff --git a/src/Parser.hs b/src/Parser.hs
index 0ac8b54..1242645 100644
--- a/src/Parser.hs
+++ b/src/Parser.hs
@@ -97,7 +97,7 @@ parseLispValue =
         char '(' >> spaces
         x <- sepEndBy parseLispValue whiteSpace
         spaces
-        t <- optionMaybe $ space >> char '.' >> space >> parseLispValue
+        t <- optionMaybe $ char '.' >> space >> parseLispValue
         spaces >> char ')'
         return $ maybe (List x) (DottedList x) t
     <?> "lisp value"