ADD-TRANSACTION-COMMIT-HOOK — Specify hooks to be run when committing changes.Function
commit-hookA designator for a function with no required arguments.
databaseA database object. This will default to the value of *default-database*.
resultThe list of currently defined commit hooks for
database.
Adds commit-hook, which should a
designator for a function with no required arguments, to the
list of hooks run when commit is called
on database which defaults to
*default-database*.
(start-transaction)
=> NIL
(add-transaction-commit-hook #'(lambda () (print "Successfully committed.")))
=> (#<Interpreted Function (LAMBDA # #) {48E2E689}>)
(commit)
"Successfully committed."
=> NIL