From ee4d6dd22844efb4bb018e371263db07310abbd7 Mon Sep 17 00:00:00 2001 From: Marc Espie Date: Fri, 31 Jan 2014 10:28:19 +0000 Subject: fix number of tests --- regress/usr.sbin/pkg_add/check-cfl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'regress') diff --git a/regress/usr.sbin/pkg_add/check-cfl b/regress/usr.sbin/pkg_add/check-cfl index 235fedd585b..ab4d0486c8b 100644 --- a/regress/usr.sbin/pkg_add/check-cfl +++ b/regress/usr.sbin/pkg_add/check-cfl @@ -1,11 +1,11 @@ #! /usr/bin/perl -# $OpenBSD: check-cfl,v 1.2 2014/01/31 10:18:35 espie Exp $ +# $OpenBSD: check-cfl,v 1.3 2014/01/31 10:28:18 espie Exp $ # Written by Marc Espie # Public domain use strict; use warnings; -use Test::Simple tests => 3; +use Test::Simple tests => 4; use OpenBSD::PkgCfl; use OpenBSD::PackingList; @@ -19,8 +19,8 @@ sub check_list if (@r != @_) { print STDERR "length: ", scalar(@r)," vs. ", scalar(@_), "\n"; - print STDERR join(',', @r), "\n"; - print STDERR join(',', @_), "\n"; + print STDERR "Expected: ", join(',', @r), "\n"; + print STDERR "Result: ", join(',', @_), "\n"; return 0; } for my $i (0 .. @_ -1) { -- cgit v1.2.3