Simplified standard create schema statement compilation.

weavejester · Dec 28, 2010 · 67d0ddd · 67d0ddd
1 parent 879ce3f
commit 67d0ddd
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/lobos/compiler.clj b/src/lobos/compiler.clj
@@ -118,9 +118,9 @@
 (defmethod compile [::standard lobos.ast.CreateSchemaStatement]
   [statement]
   (let [{:keys [sname elements]} statement]
-    (format "CREATE SCHEMA %s \n\n%s"
-            (as-str sname)
-            (join "\n\n" (map compile elements)))))
+    (str "CREATE SCHEMA "
+         (join "\n\n" (conj (map compile elements)
+                            (as-str sname))))))
 
 (defmethod compile [::standard lobos.ast.CreateTableStatement]
   [statement]