From 2a3ccfb66714efc1c081ea6e921336f80b756d3c Mon Sep 17 00:00:00 2001 From: Michael Gran Date: Sat, 23 Feb 2019 23:16:31 -0800 Subject: [PATCH] Make locale monetary conversion tests be less strict on terminal whitespace * test-suite/tests/i18n.test (monetary-amount->locale-string): modified --- test-suite/tests/i18n.test | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test-suite/tests/i18n.test b/test-suite/tests/i18n.test index 73e5381b8..811be7b10 100644 --- a/test-suite/tests/i18n.test +++ b/test-suite/tests/i18n.test @@ -677,7 +677,7 @@ (under-french-locale-or-unresolved (lambda () (let* ((fr (make-locale LC_ALL %french-locale-name)) - (str (monetary-amount->locale-string 123456 #f fr))) + (str (string-trim-both (monetary-amount->locale-string 123456 #f fr)))) ;; Check for both NO-BREAK SPACE and SPACE. (or (string=? "123 456,00 +EUR" str) (string=? "123 456,00 +EUR" str)))))) @@ -696,7 +696,7 @@ (under-french-locale-or-unresolved (lambda () (let ((fr (make-locale LC_ALL %french-locale-name))) - (monetary-amount->locale-string 0. #f fr))))) + (string-trim-both (monetary-amount->locale-string 0. #f fr)))))) (pass-if-equal "one cent" "0,01 EUR "