diff --git a/src/import-export/qif-import/qif-import.scm b/src/import-export/qif-import/qif-import.scm index b8d9b065ab..0e883b8b74 100644 --- a/src/import-export/qif-import/qif-import.scm +++ b/src/import-export/qif-import/qif-import.scm @@ -7,7 +7,7 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (define-module (gnucash import-export qif-import)) -(use-modules (gnucash main) (g-wrapped gw-gnc)) ;; FIXME: delete after we finish modularizing. +(use-modules (gnucash main)) ;; FIXME: delete after we finish modularizing. (use-modules (g-wrapped gw-runtime)) (use-modules (gnucash gnc-module)) (use-modules (ice-9 slib)) @@ -19,6 +19,7 @@ (gnc:module-load "gnucash/engine" 0) (gnc:module-load "gnucash/app-utils" 0) +(gnc:module-load "gnucash/gnome-utils" 0) (load-from-path "qif-import/qif-objects.scm") ;; class definitions (load-from-path "qif-import/qif-parse.scm") ;; string-to-value diff --git a/src/import-export/qif-import/qif-parse.scm b/src/import-export/qif-import/qif-parse.scm index d1b3dda56f..54e930ca6b 100644 --- a/src/import-export/qif-import/qif-parse.scm +++ b/src/import-export/qif-import/qif-parse.scm @@ -252,12 +252,13 @@ 'xout) ; ((vest) ; 'vest) - (else + (else (gnc:warning-dialog - (string-append - (sprintf #f "The file contains an unknown Action '%s'.\n" + (string-append + (sprintf #f (_ "The file contains an unknown Action '%s'.") read-value) - "Some transactions may be discarded.")) + "\n" + (_ "Some transactions may be discarded."))) #f))) #f))