diff --git a/src/gnome/window-acct-tree.c b/src/gnome/window-acct-tree.c
index 38f49f5848..372d6e8097 100644
--- a/src/gnome/window-acct-tree.c
+++ b/src/gnome/window-acct-tree.c
@@ -655,6 +655,10 @@ gnc_acct_tree_window_menu_scrub_cb(GtkWidget * widget,
 
   xaccAccountScrubOrphans (account);
   xaccAccountScrubImbalance (account);
+/* #define TEST_LOT_SCRUBBING */
+#ifdef TEST_LOT_SCRUBBING
+  xaccAccountScrubLotsBalance (account);
+#endif
 
   gnc_resume_gui_refresh ();
 }
@@ -677,6 +681,9 @@ gnc_acct_tree_window_menu_scrub_sub_cb(GtkWidget * widget,
 
   xaccAccountTreeScrubOrphans (account);
   xaccAccountTreeScrubImbalance (account);
+#ifdef TEST_LOT_SCRUBBING
+  xaccAccountTreeScrubLotsBalance (account);
+#endif
 
   gnc_resume_gui_refresh ();
 }
@@ -692,6 +699,10 @@ gnc_acct_tree_window_menu_scrub_all_cb(GtkWidget * widget,
   xaccGroupScrubOrphans (group);
   xaccGroupScrubImbalance (group);
 
+#ifdef TEST_LOT_SCRUBBING
+  xaccGroupScrubLotsBalance (group);
+#endif
+
   gnc_resume_gui_refresh ();
 }