From: mike <mike>
Date: Wed, 9 Nov 2005 17:03:15 +0000 (+0000)
Subject: Fix typo in diagnostic.
X-Git-Tag: cpan_1_22~367
X-Git-Url: http://git.indexdata.com/?p=ZOOM-Perl-moved-to-github.git;a=commitdiff_plain;h=18b078e9a9ec27af837756936018caec5481dd9d

Fix typo in diagnostic.
---

diff --git a/t/15-scan.t b/t/15-scan.t
index 4e42f13..31d1e13 100644
--- a/t/15-scan.t
+++ b/t/15-scan.t
@@ -1,4 +1,4 @@
-# $Id: 15-scan.t,v 1.5 2005-11-09 17:00:43 mike Exp $
+# $Id: 15-scan.t,v 1.6 2005-11-09 17:03:15 mike Exp $
 
 # Before `make install' is performed this script should be runnable with
 # `make test'. After `make install' it should work as `perl 15-scan.t'
@@ -96,6 +96,6 @@ sub scan {
     ok($errcode == 0, "scan for '$startterm'");
     $n = Net::Z3950::ZOOM::scanset_size($ss);
     ok(defined $n, "got size");
-    ok($n == $nexpected, "got $n terms (expected $n)");
+    ok($n == $nexpected, "got $n terms (expected $nexpected)");
     return ($ss, $n);
 }