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