[svn:parrot] r48021 - branches/html_cleanup/t/perl

[mikehh at svn.parrot.org]

Author: mikehh
Date: Wed Jul  7 02:46:09 2010
New Revision: 48021
URL: https://trac.parrot.org/parrot/changeset/48021

Log:
fix failing test for added module

Modified:
   branches/html_cleanup/t/perl/Parrot_Docs.t

Modified: branches/html_cleanup/t/perl/Parrot_Docs.t
==============================================================================
--- branches/html_cleanup/t/perl/Parrot_Docs.t	Wed Jul  7 00:47:18 2010	(r48020)
+++ branches/html_cleanup/t/perl/Parrot_Docs.t	Wed Jul  7 02:46:09 2010	(r48021)
@@ -1,5 +1,5 @@
 #! perl
-# Copyright (C) 2001-2005, Parrot Foundation.
+# Copyright (C) 2001-2010, Parrot Foundation.
 # $Id$
 
 use strict;
@@ -43,7 +43,7 @@
 my @a = $d->files_of_type('Perl module');
 
 # This will fail if you add a new module.
-is( @a, 8, 'files_of_type succeed' );
+is( @a, 9, 'files_of_type succeed' );
 @a = $d->files_of_type('foo');
 is( @a, 0, 'files_of_type fail' );