projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
gui: Fix temporary filtering by a variable's value.
[pspp]
/
tests
/
perl-module.at
diff --git
a/tests/perl-module.at
b/tests/perl-module.at
index 2be037066c933691e2417758001a09db7e1515ef..308dd7711b219a317b0f09f0470fe523f10dc9f2 100644
(file)
--- a/
tests/perl-module.at
+++ b/
tests/perl-module.at
@@
-56,11
+56,9
@@
DISPLAY DICTIONARY.
SHOW WEIGHT.
])
AT_CHECK([pspp -O format=csv dump-dict.sps], [0],
SHOW WEIGHT.
])
AT_CHECK([pspp -O format=csv dump-dict.sps], [0],
- [File label:
+ [File label:
My Dictionary
-My Dictionary
-
-Documents in the active file:
+Documents in the active dataset:
These Documents
These Documents
@@
-151,11
+149,9
@@
name,Format: A20,,2
,Display Alignment: Left,,
,Display Width: 20,,
,Display Alignment: Left,,
,Display Width: 20,,
-File label:
-
-This is the file label
+File label: This is the file label
-Documents in the active
file
:
+Documents in the active
dataset
:
This is a document line
This is a document line
@@
-173,11
+169,9
@@
name,Format: A20,,2
,Display Alignment: Left,,
,Display Width: 20,,
,Display Alignment: Left,,
,Display Width: 20,,
-File label:
-
-This is the file label
+File label: This is the file label
-Documents in the active
file
:
+Documents in the active
dataset
:
This is a document line
This is a document line
@@
-620,7
+614,7
@@
AT_DATA([test.pl],
print $PSPP::errstr, "\n";
]])
AT_CHECK([RUN_PERL_MODULE test.pl], [0],
print $PSPP::errstr, "\n";
]])
AT_CHECK([RUN_PERL_MODULE test.pl], [0],
- [[Error opening
"no-such-file.sav"
for reading as a system file: No such file or directory.
+ [[Error opening
`no-such-file.sav'
for reading as a system file: No such file or directory.
]],
[[Name "PSPP::errstr" used only once: possible typo at test.pl line 8.
]])
]],
[[Name "PSPP::errstr" used only once: possible typo at test.pl line 8.
]])
@@
-704,6
+698,8
@@
AT_CLEANUP
AT_SETUP([Perl Pspp.t])
AT_SKIP_IF([test "$WITH_PERL_MODULE" = no])
AT_SETUP([Perl Pspp.t])
AT_SKIP_IF([test "$WITH_PERL_MODULE" = no])
+# Skip this test if Perl's Text::Diff module is not installed.
+AT_CHECK([perl -MText::Diff -e '' || exit 77])
AT_CHECK([RUN_PERL_MODULE $abs_top_builddir/perl-module/t/Pspp.t], [0],
[[1..36
ok 1 - use PSPP;
AT_CHECK([RUN_PERL_MODULE $abs_top_builddir/perl-module/t/Pspp.t], [0],
[[1..36
ok 1 - use PSPP;