Don't crash when someone imports a broken QIF (#155244).

* src/import-export/qif-import/qif-object.scm:
	  provide a default account name so we don't crash when someone
	  imports a broken QIF that has a !Account without an account name.
	  Fixes bug #155244.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@10303 57a11ea4-9604-0410-9ed3-97b8803252fd

ChangeLog

@@ -1,3 +1,10 @@
+2004-10-13  Derek Atkins  <derek@ihtfp.com>
+
+	* src/import-export/qif-import/qif-object.scm:
+	  provide a default account name so we don't crash when someone
+	  imports a broken QIF that has a !Account without an account name.
+	  Fixes bug #155244.
+
 2004-10-08  Derek Atkins  <derek@ihtfp.com>
 
 	* engine/gw-engine-spec.scm:

src/import-export/qif-import/qif-objects.scm

@@ -358,6 +358,7 @@
 (define (make-qif-acct)
   (let ((retval (make-simple-obj <qif-acct>)))
     (qif-acct:set-type! retval "Bank")
+    (qif-acct:set-name! retval "Default Account")
     retval))
 
 (define qif-acct?