Harness prove-switches.t for fixed bug 30952
[p5sagit/p5-mst-13.2.git] / lib / Test / Harness / Assert.pm
index 5321def..29f6c7a 100644 (file)
@@ -1,12 +1,10 @@
-# $Id: Assert.pm,v 1.2 2002/04/26 05:12:27 schwern Exp $
-
 package Test::Harness::Assert;
 
 use strict;
 require Exporter;
 use vars qw($VERSION @EXPORT @ISA);
 
-$VERSION = '0.01';
+$VERSION = '0.02';
 
 @ISA = qw(Exporter);
 @EXPORT = qw(assert);
@@ -30,11 +28,9 @@ A simple assert routine since we don't have Carp::Assert handy.
 
 B<For internal use by Test::Harness ONLY!>
 
-=head2 Functions
-
-=over 4
+=head1 FUNCTIONS
 
-=item B<assert>
+=head2 C<assert()>
 
   assert( EXPR, $name );
 
@@ -57,7 +53,7 @@ sub assert ($;$) {
 
 =head1 AUTHOR
 
-Michael G Schwern E<lt>schwern@pobox.comE<gt>
+Michael G Schwern C<< <schwern at pobox.com> >>
 
 =head1 SEE ALSO