X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fclass-struct.t;h=26505bacfc6b0f6cab58c75b9ef912e95b846e27;hb=9ee2bb1a7c54b1866ff07ab9c157254810ee5205;hp=c875fb068f7a47fcda8dac62e77b4f557250d4ef;hpb=ad6edfcb06a9f03c82360544f319137706413b4a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/class-struct.t b/t/lib/class-struct.t
index c875fb0..26505ba 100644
--- a/t/lib/class-struct.t
+++ b/t/lib/class-struct.t
@@ -5,7 +5,7 @@ BEGIN {
 	@INC = '../lib';
 }
 
-print "1..2\n";
+print "1..8\n";
 
 package aClass;
 
@@ -15,7 +15,8 @@ sub meth { 42 }
 
 package MyObj;
 
-use Class::Struct 'struct';
+use Class::Struct;
+use Class::Struct 'struct'; # test out both forms
 
 use Class::Struct SomeClass => { SomeElem => '$' };
 
@@ -63,7 +64,3 @@ $obk->SomeElem(123);
 print "not " unless $obk->SomeElem() == 123;
 print "ok 8\n";
 
-
-
-
-