From: Alfredo Beaumont <alfredo.beaumont@gmail.com>
Date: Wed, 24 Apr 2013 16:56:20 +0000 (+0200)
Subject: ls-read: fix spacing
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=1d825c43d523dda70b6c870726902c6c8911f3a0;p=jscl.git

ls-read: fix spacing
---

diff --git a/src/read.lisp b/src/read.lisp
index 39aa7f5..8f7fd71 100644
--- a/src/read.lisp
+++ b/src/read.lisp
@@ -236,8 +236,8 @@
        (read-sharp stream))
       (t
        (let ((string (read-until stream #'terminalp)))
-	 (or (values (!parse-integer string nil))
-	     (read-symbol string)))))))
+         (or (values (!parse-integer string nil))
+             (read-symbol string)))))))
 
 (defun ls-read (stream &optional (eof-error-p t) eof-value)
   (let ((x (ls-read-1 stream)))