* lib: do some more escaping of body text

2012-11-18 22:09:56 +02:00
parent ef1791ec7c
commit 30f93663b0
4 changed files with 21 additions and 4 deletions
--- a/guile/tests/test-mu-guile.scm
+++ b/guile/tests/test-mu-guile.scm
@ -97,9 +97,9 @@ exec guile -e main -s $0 $@
 (define (test-stats)
  "Test statistical functions."
  ;; average
-  (num-equal-or-exit (mu:average mu:size) 81709/12)
+  (num-equal-or-exit (mu:average mu:size) 40859/6)
  (num-equal-or-exit (floor (mu:stddev mu:size))
-    (floor 13414.7101616927))
+    (floor 13413.7101616927))
  (num-equal-or-exit (mu:max mu:size) 46230)
  (num-equal-or-exit (mu:min mu:size) 111))