diff --git a/src/scm/qif-import/qif-parse.scm b/src/scm/qif-import/qif-parse.scm
index 36d718d380..40178e4d7c 100644
--- a/src/scm/qif-import/qif-parse.scm
+++ b/src/scm/qif-import/qif-parse.scm
@@ -359,11 +359,11 @@
 
 (define decimal-radix-regexp
   (make-regexp 
-   "^\\$?-?\\$?[0-9]+$|^\\$?-?\\$?[0-9]?[0-9]?[0-9]?(,[0-9][0-9][0-9])*(\\.[0-9]*)?$"))
+   "^\\$?-?\\$?[0-9]+$|^\\$?-?\\$?[0-9]?[0-9]?[0-9]?(,?[0-9][0-9][0-9])*(\\.[0-9]*)?$"))
 
 (define comma-radix-regexp
   (make-regexp 
-   "^\\$?-?\\$?[0-9]+$|^\\$?-?\\$?[0-9]?[0-9]?[0-9]?(\\.[0-9][0-9][0-9])*(,[0-9]*)?$"))
+   "^\\$?-?\\$?[0-9]+$|^\\$?-?\\$?[0-9]?[0-9]?[0-9]?(\\.?[0-9][0-9][0-9])*(,[0-9]*)?$"))
 
 (define (value-is-decimal-radix? value)
   (if (regexp-exec decimal-radix-regexp value)