~ chicken-core (chicken-5) d68f5f8d6534e5861535701b667c0e3462dda051

commit d68f5f8d6534e5861535701b667c0e3462dda051
Author:     Mario Domenech Goulart <mario@parenteses.org>
AuthorDate: Sun Sep 23 22:25:17 2018 +0200
Commit:     Mario Domenech Goulart <mario@parenteses.org>
CommitDate: Sun Sep 23 22:25:17 2018 +0200

    manual/Module (chicken syntax): fix indentation (replace tabs by spaces)
    
    Apparently tabs causes indentation issues in the wiki.

diff --git a/manual/Module (chicken syntax) b/manual/Module (chicken syntax)
index b93e2c96..eaa7dbd1 100644
--- a/manual/Module (chicken syntax)	
+++ b/manual/Module (chicken syntax)	
@@ -96,18 +96,18 @@ as
   (er-macro-transformer
     (lambda (exp rename compare)
       (let ((clauses (cdr exp)))
-	(if (null? clauses)
-	    `(,(rename 'quote) unspecified)
-	    (let* ((first (car clauses))
-		   (rest (cdr clauses))
-		   (test (car first)))
-	      (cond ((and (symbol? test)
-			  (compare test (rename 'else)))
-		     `(,(rename 'begin) ,@(cdr first)))
-		    (else `(,(rename 'if)
-			    ,test
-			     (,(rename 'begin) ,@(cdr first))
-			     (,(r 'cond) ,@rest)))))))))
+        (if (null? clauses)
+            `(,(rename 'quote) unspecified)
+            (let* ((first (car clauses))
+                   (rest (cdr clauses))
+                   (test (car first)))
+              (cond ((and (symbol? test)
+                          (compare test (rename 'else)))
+                     `(,(rename 'begin) ,@(cdr first)))
+                    (else `(,(rename 'if)
+                            ,test
+                             (,(rename 'begin) ,@(cdr first))
+                             (,(r 'cond) ,@rest)))))))))
 
 In this example the identifier {{else}} is renamed before being passed
 to the comparison predicate, so the comparison will be true if and