refactoring

[pspp] / tests / language / xforms / sample.at

diff --git a/tests/language/xforms/sample.at b/tests/language/xforms/sample.at
index 406517a03d09b35baa4c7706131be4796dcb81a5..70cf6e64ef1fc1222d5dbd37437badbf8baa37b7 100644 (file)
--- a/tests/language/xforms/sample.at
+++ b/tests/language/xforms/sample.at
@@ -42,6 +42,7 @@ AT_CHECK(
   [n=0
    while read line; do
      n=`expr $n + 1`
+     line=$(echo "$line" | tr -d '\r')
      case $line in # (
        "Table: Data List" | A | [[0-9]] | 10) ;; # (
        *) echo $line; exit 1;