diff options
| author | Thiago Jung Bauermann <bauermann@kolabnow.com> | 2025-01-03 15:17:37 -0300 |
|---|---|---|
| committer | Thiago Jung Bauermann <bauermann@kolabnow.com> | 2025-01-03 16:33:06 -0300 |
| commit | a703f002143b7167beb4fb10c71a497c8ed5b2f9 (patch) | |
| tree | f35b010feed1d0c50aa2a454bebb190ddb13319e /guile | |
| parent | 8c0f136a50420ef20656fbff40caebafd3c184f5 (diff) | |
guile: tests: Fix encoding of "atomic" message
It's stated to be US-ASCII with 7-bit encoding, but it contains the
UTF-8 character '—'.
Fixing the encoding very slightly changes the average size of messages
reported by mu:average, so adjust the new expected value.
Diffstat (limited to 'guile')
| -rwxr-xr-x | guile/tests/test-mu-guile.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guile/tests/test-mu-guile.scm b/guile/tests/test-mu-guile.scm index afa4f48..975d3d7 100755 --- a/guile/tests/test-mu-guile.scm +++ b/guile/tests/test-mu-guile.scm @@ -83,7 +83,7 @@ exec guile -e main -s $0 $@ (str-equal-or-exit (mu:subject msg) "atoms") (str-equal-or-exit (mu:to msg) "Democritus <demo@example.com>") (str-equal-or-exit (mu:from msg) "Richard P. Feynman <rpf@example.com>") - ;;(str-equal-or-exit (mu:header msg "Content-transfer-encoding") "7BIT") + ;;(str-equal-or-exit (mu:header msg "Content-Transfer-Encoding") "8bit") (if (not (equal? (mu:priority msg) mu:prio:high)) (error-exit "Expected ~a, got ~a" (mu:priority msg) mu:prio:high)))) @@ -97,7 +97,7 @@ exec guile -e main -s $0 $@ (define (test-stats) "Test statistical functions." ;; average - (num-equal-or-exit (mu:average mu:size) 82601/14) + (num-equal-or-exit (mu:average mu:size) 41299/7) (num-equal-or-exit (floor (mu:stddev mu:size)) 12637.0) (num-equal-or-exit (mu:max mu:size) 46308) (num-equal-or-exit (mu:min mu:size) 111)) |