[Gnucash-changes] Perry Smith's Null Account patch.

[Derek Atkins]

Log Message:
-----------
Perry Smith's Null Account patch.

	* src/import-export/qif-import/qif-dialog-utils.scm:
	  Perry Smith's Null Account Patch.  Make sure the security is
	  a real string before appending an account separator, so we
	  don't try to create a "null" account.

Modified Files:
--------------
    gnucash:
        ChangeLog
    gnucash/src/import-export/qif-import:
        qif-dialog-utils.scm

Revision Data
-------------
Index: ChangeLog
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/ChangeLog,v
retrieving revision 1.1833
retrieving revision 1.1834
diff -LChangeLog -LChangeLog -u -r1.1833 -r1.1834
--- ChangeLog
+++ ChangeLog
@@ -9,6 +9,11 @@
 	Small documentation tweak to make QofEntity and QofParam
 	structures visible to doxygen.
 
+	* src/import-export/qif-import/qif-dialog-utils.scm:
+	  Perry Smith's Null Account Patch.  Make sure the security is
+	  a real string before appending an account separator, so we
+	  don't try to create a "null" account.
+
 2004-08-19  Derek Atkins  <derek at ihtfp.com>
 
 	* configure.in: change the gtkhtml order to search for >= 1.1 before
Index: qif-dialog-utils.scm
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/import-export/qif-import/qif-dialog-utils.scm,v
retrieving revision 1.4
retrieving revision 1.5
diff -Lsrc/import-export/qif-import/qif-dialog-utils.scm -Lsrc/import-export/qif-import/qif-dialog-utils.scm -u -r1.4 -r1.5
--- src/import-export/qif-import/qif-dialog-utils.scm
+++ src/import-export/qif-import/qif-dialog-utils.scm
@@ -18,8 +18,11 @@
 
 (define (default-interest-acct brokerage security) 
   (string-append (_ "Interest") (gnc:account-separator-char) 
-                 brokerage (gnc:account-separator-char)  
-                 security))
+                 brokerage
+		 (if (string=? security "")
+		  ""
+		  (string-append (gnc:account-separator-char)  
+				  security))))
 
 (define (default-capital-return-acct brokerage security) 
   (string-append (_ "Cap Return") (gnc:account-separator-char)