diff --git a/ChangeLog b/ChangeLog
index 10aab7a09d..8557d33ac0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-08-15  Christian Stimming  <stimming@tuhh.de>
+
+	* src/import-export/import-backend.c: Workaround for
+	multi-currency importing bug as discussed on gnucash-devel.
+
 2003-08-13  Matt Vanecek   <mevanecek@yahoo.com>
 
     * src/backend/postgres/PostgresBackend.c pgend_session_begin():
diff --git a/src/import-export/import-backend.c b/src/import-export/import-backend.c
index 1f79e4942c..87419998b3 100644
--- a/src/import-export/import-backend.c
+++ b/src/import-export/import-backend.c
@@ -822,12 +822,22 @@ gnc_import_process_trans_clist (GtkCList *clist,
 	      (gnc_import_TransInfo_get_trans (trans_info), split);
 	    xaccAccountInsertSplit
 	      (gnc_import_TransInfo_get_destacc (trans_info), split);
-	    xaccSplitSetBaseValue
+	    /*xaccSplitSetBaseValue
 	      (split, 
 	       gnc_numeric_neg(xaccTransGetImbalance 
 			       (gnc_import_TransInfo_get_trans (trans_info))),
 	       xaccTransGetCurrency 
-	       (gnc_import_TransInfo_get_trans (trans_info)));
+	       (gnc_import_TransInfo_get_trans (trans_info)));*/
+	    /* This is a quick workaround for the bug described in
+	       http://gnucash.org/pipermail/gnucash-devel/2003-August/009982.html  */
+	    xaccSplitSetValue
+	      (split, 
+	       gnc_numeric_neg(xaccTransGetImbalance 
+			       (gnc_import_TransInfo_get_trans (trans_info))));
+	    xaccSplitSetAmount
+	      (split, 
+	       gnc_numeric_neg(xaccTransGetImbalance 
+			       (gnc_import_TransInfo_get_trans (trans_info))));
 	    xaccSplitSetMemo (split, _("Auto-Balance split"));
 	  }