diff --git a/libgnucash/app-utils/test/test-gnc-optiondb.scm b/libgnucash/app-utils/test/test-gnc-optiondb.scm
index 814ca1a97b..d1db9d7385 100644
--- a/libgnucash/app-utils/test/test-gnc-optiondb.scm
+++ b/libgnucash/app-utils/test/test-gnc-optiondb.scm
@@ -83,8 +83,7 @@
       (create-account book expenses ACCT-TYPE-EXPENSE "Rent")))
 
   (define (cleanup book root)
-    (xaccAccountBeginEdit root)
-    (xaccAccountDestroy root)
+;; Destroying the book destroys the account tree too
     (qof-book-destroy book))
 
   (define (test-make-account-list-option book)