parsed -> suffix!, add append!

[factor.git] / extra / db / info / info.factor

diff --git a/extra/db/info/info.factor b/extra/db/info/info.factor
index 66409f283418235db896f07ac2d742af75e52071..4d17b6bf10542182ad0ad3a03c5e4258a3bb522e 100644 (file)
--- a/extra/db/info/info.factor
+++ b/extra/db/info/info.factor
@@ -10,6 +10,6 @@ SYNTAX: get-psql-info <postgresql-db> get-info 5 firstn
         [ >>username ]
         [ [ f ] [ ] if-empty >>password ]
         [ >>database ]
-    } spread parsed ;
+    } spread suffix! ;
 
-SYNTAX: get-sqlite-info get-info first <sqlite-db> parsed ;
\ No newline at end of file
+SYNTAX: get-sqlite-info get-info first <sqlite-db> suffix! ;