factor: fix some spacing

[factor.git] / basis / quoted-printable / quoted-printable.factor

diff --git a/basis/quoted-printable/quoted-printable.factor b/basis/quoted-printable/quoted-printable.factor
index bffe4f53d79108a7573f4b6d74ce975288bec0ce..0453fe7f60a4cd7f40c15c1538831ca912c4d665 100644 (file)
--- a/basis/quoted-printable/quoted-printable.factor
+++ b/basis/quoted-printable/quoted-printable.factor
@@ -47,9 +47,9 @@ PRIVATE>
 
 : read-char ( byte -- ch )
     dup CHAR: = = [
-       drop read1 dup CHAR: \n =
-       [ drop read1 read-char ]
-       [ read1 2array hex> ] if
+        drop read1 dup CHAR: \n =
+        [ drop read1 read-char ]
+        [ read1 2array hex> ] if
     ] when ;
 
 : read-quoted ( -- bytes )