From 1a9cb39b9b141f5fabdd6c5ab7fdffc666871003 Mon Sep 17 00:00:00 2001 From: Ben Pfaff Date: Thu, 4 Aug 2022 16:58:59 -0700 Subject: [PATCH] MINCOLWIDTH --- tests/language/stats/ctables.at | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) diff --git a/tests/language/stats/ctables.at b/tests/language/stats/ctables.at index 0b85e617e8..9c9e598c43 100644 --- a/tests/language/stats/ctables.at +++ b/tests/language/stats/ctables.at @@ -2374,3 +2374,28 @@ AT_CHECK([pspp ctables.sps -O box=unicode], [0], [dnl ╰──────────────────────────────────────────────────────────────┴─────┴────────╯ ]) AT_CLEANUP + +AT_SETUP([CTABLES FORMAT MINCOLWIDTH MAXCOLWIDTH]) +AT_CHECK([ln $top_srcdir/examples/nhtsa.sav . || cp $top_srcdir/examples/nhtsa.sav .]) +AT_DATA([ctables.sps], +[[GET 'nhtsa.sav'. +CTABLES /FORMAT MINCOLWIDTH=1 MAXCOLWIDTH=2 UNITS=INCHES /TABLE BY qns3a. +]]) +AT_CHECK([pspp ctables.sps -o - -O box=unicode -o pspp.spv], [0], [dnl + Custom Tables +╭────────────╮ +│S3a. GENDER:│ +├─────┬──────┤ +│ Male│Female│ +├─────┼──────┤ +│Count│ Count│ +├─────┼──────┤ +│ 3132│ 3867│ +╰─────┴──────╯ +]) +AT_CHECK([pspp-output get-table-look pspp.spv pspp.stt]) +AT_CHECK([sed 's/ /\n/g' pspp.stt | grep ColumnWidth | sort], [0], [dnl +maximumColumnWidth="192" +minimumColumnWidth="96" +]) +AT_CLEANUP -- 2.30.2