Patch for symbol/string confusion in transaction.scm

[Derek Atkins]

This would work, but a better test is:

        (eq? filter-mode 'include)

I've applied that change to HEAD and 1.8 (or will shortly).

-derek

"James A. Treacy" <treacy at debian.org> writes:

> My feeble ability in guile has created the following patch for
> transaction.scm. Please apply if you feel it is correct.
> This is a result of debian bug #186004 (http://bugs.debian.org/186004).
> 
> --- src/report/standard-reports/transaction.scm.j       2003-04-03
> 13:57:35.000000000 -0500
> +++ src/report/standard-reports/transaction.scm 2003-04-03
> 13:58:01.000000000 -0500
> @@ -1142,7 +1142,7 @@
>  
>           ;;This should probably a cond or a case to allow for different
> filter types.
>           ;;(gnc:warn "Filter Mode: " filter-mode)
> -         (if (string=? filter-mode "include")
> +         (if (string=? (symbol->string filter-mode) "include")
>               (begin
>                 ;;(gnc:warn "Including Filter Accounts")
>                 (set! splits (filter (lambda (split) 
> @@ -1151,7 +1151,7 @@
>                 )
>               )
>  
> -         (if (string=? filter-mode "exclude")
> +         (if (string=? (symbol->string filter-mode) "exclude")
>               (begin
>                 ;;(gnc:warn "Excluding Filter Accounts")
>                 (set! splits (filter (lambda (split)
> 
> -- 
> James (Jay) Treacy
> treacy at debian.org
> _______________________________________________
> gnucash-patches mailing list
> gnucash-patches at lists.gnucash.org
> https://lists.gnucash.org/mailman/listinfo/gnucash-patches

-- 
       Derek Atkins, SB '93 MIT EE, SM '95 MIT Media Laboratory
       Member, MIT Student Information Processing Board  (SIPB)
       URL: http://web.mit.edu/warlord/    PP-ASEL-IA     N1NWH
       warlord at MIT.EDU                        PGP key available