From a773199a535b8d1720418b64bddb7c69059a9bb4 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@barzilay.org>
Date: Sun, 23 Nov 2003 21:14:24 +0000
Subject: [PATCH] typo.

original commit: d4ac7ce63921cde5a6bb84e24bcfe34b477bb0dd
---
 collects/mzlib/cm.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mzlib/cm.ss b/collects/mzlib/cm.ss
index 3ed5f5c..9201cbb 100644
--- a/collects/mzlib/cm.ss
+++ b/collects/mzlib/cm.ss
@@ -70,7 +70,7 @@
   
   (define (compile-zo path)
     ((trace) (format "~acompiling: ~a" (indent) path))
-    (parameterize ([indent (string-append "  " indent)])
+    (parameterize ([indent (string-append "  " (indent))])
       (let ([zo-name (string-append (get-compilation-path path) ".zo")])
         (cond
          [(and (file-exists? zo-name) (trust-existing-zos)) (touch zo-name)]