[svn:parrot] r38235 - in trunk: examples/streams t/codingstd

fperrad at svn.parrot.org fperrad at svn.parrot.org
Mon Apr 20 18:58:56 UTC 2009


Author: fperrad
Date: Mon Apr 20 18:58:55 2009
New Revision: 38235
URL: https://trac.parrot.org/parrot/changeset/38235

Log:
[codingstd] partial revert of r38115,
2 files in examples/streams are handled as exception
by t/codingstd/svn_id.t
See TT #554.

Modified:
   trunk/examples/streams/FileLines.pir
   trunk/examples/streams/ParrotIO.pir
   trunk/t/codingstd/svn_id.t

Modified: trunk/examples/streams/FileLines.pir
==============================================================================
--- trunk/examples/streams/FileLines.pir	Mon Apr 20 17:20:02 2009	(r38234)
+++ trunk/examples/streams/FileLines.pir	Mon Apr 20 18:58:55 2009	(r38235)
@@ -1,5 +1,3 @@
-# $Id$
-
 =head1 Advanced Lines Example
 
 This is an advanced example.

Modified: trunk/examples/streams/ParrotIO.pir
==============================================================================
--- trunk/examples/streams/ParrotIO.pir	Mon Apr 20 17:20:02 2009	(r38234)
+++ trunk/examples/streams/ParrotIO.pir	Mon Apr 20 18:58:55 2009	(r38235)
@@ -1,5 +1,3 @@
-# $Id$
-
 =head1 Filehandle Object Example
 
 This small example shows the usage of C<Stream::ParrotIO>.

Modified: trunk/t/codingstd/svn_id.t
==============================================================================
--- trunk/t/codingstd/svn_id.t	Mon Apr 20 17:20:02 2009	(r38234)
+++ trunk/t/codingstd/svn_id.t	Mon Apr 20 18:58:55 2009	(r38235)
@@ -45,6 +45,8 @@
         ( File::Spec->catdir( $cwd, $_ ) ) => 1,
     } qw(
         examples/pir/quine_ord.pir
+        examples/streams/FileLines.pir
+        examples/streams/ParrotIO.pir
     );
 
 my @files = grep { ! $known_exceptions{$_} }


More information about the parrot-commits mailing list