# HG changeset patch # User Axel Jacobs # Date 1309296180 -3600 # Node ID a853d5280041a12401b6b5c74365e24cf628fabf # Parent 1d4a7742ba504496a5e32993f8a9a5a5ba6c8085 Minor fiddling with objpict_test. diff -r 1d4a7742ba50 -r a853d5280041 tests/objpict_test.pl --- a/tests/objpict_test.pl Tue Jun 28 21:16:09 2011 +0100 +++ b/tests/objpict_test.pl Tue Jun 28 22:23:00 2011 +0100 @@ -17,15 +17,15 @@ use File::Temp qw/ tempdir /; my $tmpdir = tempdir( CLEANUP => 0 ); -my $object = "data/objects/mybox.rad"; +my $objects = "data/objects/mybox.rad data/objects/anotherbox.rad"; my $material = "data/objects/objects.mat"; # Options are arrays of [STDIN, command-line options]. # Please include the pipe symbol as part of STDIN. # Put a leading space in front of STDIN to line up the output. my @options = ( - ["", "$material $object"], - [" cat $material $object |", ""], + ["", "$material $objects"], + [" cat $material $objects |", ""], ); # Run old CSH and new Perl script with different options,