AUDIT: r17885 - gnucash/trunk/src/app-utils - Bug #570894: Fix an else clause in budget->guid.
Andreas Köhler
andi5 at cvs.gnucash.org
Sun Feb 8 19:18:00 EST 2009
Author: andi5
Date: 2009-02-08 19:18:00 -0500 (Sun, 08 Feb 2009)
New Revision: 17885
Trac: http://svn.gnucash.org/trac/changeset/17885
Modified:
gnucash/trunk/src/app-utils/options.scm
Log:
Bug #570894: Fix an else clause in budget->guid.
Scheme is not common lisp, so rather use 'else', t might be unbound.
Found by Forest Bond.
BP
Modified: gnucash/trunk/src/app-utils/options.scm
===================================================================
--- gnucash/trunk/src/app-utils/options.scm 2009-02-08 14:56:16 UTC (rev 17884)
+++ gnucash/trunk/src/app-utils/options.scm 2009-02-09 00:18:00 UTC (rev 17885)
@@ -314,7 +314,7 @@
(define (budget->guid budget)
(cond ((eq? budget #f) #f)
((string? budget) budget)
- (t (gncBudgetGetGUID budget))))
+ (else (gncBudgetGetGUID budget))))
(define (guid->budget budget)
(if (string? budget)
More information about the gnucash-changes
mailing list