diff --git a/ChangeLog b/ChangeLog
index 3c926171ec..ecf6b4248a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2001-06-09  Dave Peticolas  <dave@krondo.com>
 
+	* src/SplitLedger.c (xaccSRDuplicateCurrent): fix bug
+
 	* src/gnc-ui-util.c (gnc_find_or_create_equity_account): allow
 	group to be specified
 	(gnc_account_create_opening_balance): search in given account's
diff --git a/src/SplitLedger.c b/src/SplitLedger.c
index 7d151fa17c..ff79ceac1c 100644
--- a/src/SplitLedger.c
+++ b/src/SplitLedger.c
@@ -2117,7 +2117,7 @@ xaccSRDuplicateCurrent (SplitRegister *reg)
     new_trans = xaccMallocTransaction ();
 
     xaccTransBeginEdit (new_trans);
-    gnc_copy_trans_onto_trans (trans, new_trans, FALSE, TRUE);
+    gnc_copy_trans_onto_trans (trans, new_trans, FALSE, FALSE);
     xaccTransSetDateSecs (new_trans, date);
     xaccTransSetNum (new_trans, out_num);
     xaccTransCommitEdit (new_trans);