diff --git a/extra/db/tuples/tuples.factor b/extra/db/tuples/tuples.factor index e02e21cbe6..71cf878d2f 100755 --- a/extra/db/tuples/tuples.factor +++ b/extra/db/tuples/tuples.factor @@ -127,12 +127,12 @@ M: retryable execute-statement* ( statement type -- ) : insert-db-assigned-statement ( tuple -- ) dup class - db get db-insert-statements [ ] cache + db get insert-statements>> [ ] cache [ bind-tuple ] 2keep insert-tuple* ; : insert-user-assigned-statement ( tuple -- ) dup class - db get db-insert-statements [ ] cache + db get insert-statements>> [ ] cache [ bind-tuple ] keep execute-statement ; : insert-tuple ( tuple -- )