diff --git a/collects/tests/datalog/pretty.rkt b/collects/tests/datalog/pretty.rkt
index f2c5c55..4378358 100644
--- a/collects/tests/datalog/pretty.rkt
+++ b/collects/tests/datalog/pretty.rkt
@@ -9,9 +9,9 @@
    "Pretty"
    
    (test-equal? "program"
- (format-program
-  (parse-program
-   (open-input-string #<<END
+                (format-program
+                 (parse-program
+                  (open-input-string #<<END
 parent(john, douglas).
 parent(john, douglas)?
 parent(john, ebbon)?