Call transaction-commit-1 to do the real work.
(defun transaction-commit (transaction &key (rucksack (current-rucksack)))
"Call transaction-commit-1 to do the real work."
(transaction-commit-1 transaction (rucksack-cache rucksack) rucksack))
Source Context