diff --git a/ssql.scm b/ssql.scm
index 9c27356..d503c85 100644
--- a/ssql.scm
+++ b/ssql.scm
@@ -80,7 +80,10 @@
 
                ((col ssql)
                 (string-intersperse (map (lambda (colname)
-                                           (self 'ssql->sql (string->symbol (sprintf "~A.~A" (car ssql) colname))))
+                                           (self 'ssql->sql 
+                                                 (string->symbol (sprintf "~A.~A" 
+                                                                          (car ssql)
+                                                                          (self 'ssql->sql colname)))))
                                          (cdr ssql))
                                     ", "))