howto submit patch

Derek Atkins gnucash-patches@gnucash.org
19 Oct 2002 00:37:18 -0400


You _STILL_ failed to CC gnucash-patches!!!!!!

-derek

Larry Evans <jcampbell3@prodigy.net> writes:

> Derek Atkins wrote:
> 
> >1) please CC gnucash-devel or gnucash-patches with ALL your replies.
> >2) this is not a unified diff, but it is better than nothing..
> >
> >I dont know if I will personally have the time to look at this soon,
> >but I've forwarded it on in case someone else can.  If you could resend
> >a unified or context diff that would be great.
> >
> I just did a 'cvs update' and then renamed the just updated qif-parse.scm to
> qif-parse.scm.old and compared with the patched qif-parse.scm with
> `diff -u qif-parse.scm qif-parse.scm.old`.
> The output is attached.
> 
> --- qif-parse.scm	Fri Oct 18 13:18:53 2002
> +++ qif-parse.scm.old	Fri Oct 18 18:00:07 2002
> @@ -491,17 +491,13 @@
>               (string-remove-char 
>                (string-remove-char value-string #\,)
>                #\$))
> -           (has-radix
> -             ( if (regexp-exec (make-regexp "^.*[.].*$") filtered-string)
> -                 1
> -                 0))
> -           (read-val
> +            (read-val
>               (with-input-from-string filtered-string
>                 (lambda () (read)))))
>         (if (number? read-val)
>             (gnc:double-to-gnc-numeric
>              (+ 0.0 read-val) GNC-DENOM-AUTO
> -            (logior (GNC-DENOM-SIGFIGS (- (string-length filtered-string) has-radix))
> +            (logior (GNC-DENOM-SIGFIGS (- (string-length filtered-string) 1))
>                      GNC-RND-ROUND))
>             (gnc:numeric-zero))))
>      ((comma)
> @@ -511,17 +507,13 @@
>                 (string-remove-char value-string #\.)
>                 #\, #\.)
>                #\$))             
> -           (has-radix
> -             ( if (regexp-exec (make-regexp "^.*[,].*$") filtered-string)
> -                 1
> -                 0))
>              (read-val
>               (with-input-from-string filtered-string
>                 (lambda () (read)))))
>         (if (number? read-val)
>             (gnc:double-to-gnc-numeric
>              (+ 0.0 read-val) GNC-DENOM-AUTO
> -            (logior (GNC-DENOM-SIGFIGS (- (string-length filtered-string) has-radix))
> +            (logior (GNC-DENOM-SIGFIGS (- (string-length filtered-string) 1))
>                      GNC-RND-ROUND))
>             (gnc:numeric-zero))))
>      ((integer)

-- 
       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@MIT.EDU                        PGP key available