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

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

src/app-utils/options.scm

@@ -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)