Build results of 662402a (on master)

Changes

@@ -1,4 +1,7 @@
 Revision history for Template::ShowStartStop
+0.2.0     Jul 20 2010
+	- Discontinue Moose usage. I don't see the point for something so simple.
+
 0.12      Jun 14 2010
 	- T:SSS now composes the ShowStopStart Role which really provides the
 	  functionality

MANIFEST

@@ -4,17 +4,17 @@ MANIFEST
 META.yml
 Makefile.PL
 README
-SubmittingPatches.pod
-lib/MooseX/Template/Context/Role/ShowStartStop.pm
+docs/SubmittingPatches.pod
 lib/Template/ShowStartStop.pm
 t/00-compile.t
 t/000-report-versions.t
+t/01-basic.t
+t/02-include.t
+t/03-process.t
+t/04-insert.t
+t/05-wrapper.t
+t/06-eval.t
 t/author-critic.t
-t/basic.t
-t/eval.t
-t/include.t
-t/insert.t
-t/process.t
 t/release-dist-manifest.t
 t/release-distmeta.t
 t/release-eol.t
@@ -27,4 +27,3 @@ t/release-synopsis.t
 t/release-unused-vars.t
 t/templates/how.tt
 t/templates/wrapper.tt
-t/wrapper.t

META.yml

@@ -14,18 +14,17 @@ build_requires:
 configure_requires:
   ExtUtils::MakeMaker: 6.31
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.101612, CPAN::Meta::Converter version 2.101610'
+generated_by: 'Dist::Zilla version 4.101900, CPAN::Meta::Converter version 2.101670'
 license: artistic_2
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
   version: 1.4
 name: Template-ShowStartStop
 requires:
-  Moose: 0
-  Moose::Role: 0
+  SUPER: 0
   Template::Context: 0
-  namespace::autoclean: 0
+  parent: 0
 resources:
   bugtracker: http://github.com/xenoterracide/Template-ShowStartStop/issues
   repository: git://github.com/xenoterracide/Template-ShowStartStop.git
-version: 0.12
+version: 0.2.0

Makefile.PL

@@ -29,12 +29,11 @@ my %WriteMakefileArgs = (
   'LICENSE' => 'artistic_2',
   'NAME' => 'Template::ShowStartStop',
   'PREREQ_PM' => {
-    'Moose' => '0',
-    'Moose::Role' => '0',
+    'SUPER' => '0',
     'Template::Context' => '0',
-    'namespace::autoclean' => '0'
+    'parent' => '0'
   },
-  'VERSION' => '0.12',
+  'VERSION' => '0.2.0',
   'test' => {
     'TESTS' => 't/*.t'
   }

README

@@ -2,7 +2,7 @@ NAME
     Template::ShowStartStop - Display where templates start and stop
 
 VERSION
-    version 0.12
+    version 0.2.0
 
 SYNOPSIS
             use Template::ShowStartStop;

SubmittingPatches.pod → docs/SubmittingPatches.pod

@@ -176,8 +176,8 @@ that starts with '-----BEGIN PGP SIGNED MESSAGE-----'.  That is
 not a text/plain, it's something else.
 
 Unless your patch is a very trivial and an obviously correct one,
-first send it with "To:" set to the mailing list, with "cc:" listing
-people who are involved in the area you are touching (the output from
+first send it with "To:" set to the RT email (or mailing list), with "cc:"
+listing people who are involved in the area you are touching (the output from
 "git blame $path" and "git shortlog --no-merges $path" would help to
 identify them), to solicit comments and reviews.  After the list
 reached a consensus that it is a good idea to apply the patch, re-send

lib/Template/ShowStartStop.pm

@@ -1,25 +1,40 @@
-#
-# This file is part of Template-ShowStartStop
-#
-# This software is Copyright (c) 2010 by Caleb Cushing.
-#
-# This is free software, licensed under:
-#
-#   The Artistic License 2.0
-#
 use strict;
 use warnings;
 package Template::ShowStartStop;
 BEGIN {
-  $Template::ShowStartStop::VERSION = '0.12';
+  $Template::ShowStartStop::VERSION = '0.2.0';
 }
-use Moose;
-use namespace::autoclean;
+use SUPER;
+use parent 'Template::Context';
+
+sub _template_id {
+	my $template = shift;
+
+	return my $template_id
+		# conditional                        # set $template to
+		= ref($template) eq 'Template::Document' ? $template->name
+		: ref($template) eq 'ARRAY'              ? join( ' + ', @{$template} )
+		: ref($template) eq 'SCALAR'             ? '(evaluated block)'
+		:                                          $template
+		;
+}
+
+sub process {
+	my $self = shift;
+	my ( $template ) = @_;
+
+	my $template_id = _template_id($template);
+
+	my $processed_data = super;
 
-extends 'Template::Context';
-with 'MooseX::Template::Context::Role::ShowStartStop';
+	return my $output
+		= "<!-- START: process $template_id -->\n"
+		. "$processed_data"
+		. "<!-- STOP:  process $template_id -->\n"
+		;
 
-__PACKAGE__->meta->make_immutable(inline_constructor => 0);
+};
+no SUPER;
 1;
 # ABSTRACT: Display where templates start and stop
 
@@ -32,7 +47,7 @@ Template::ShowStartStop - Display where templates start and stop
 
 =head1 VERSION
 
-version 0.12
+version 0.2.0
 
 =head1 SYNOPSIS
 

t/00-compile.t

@@ -1,15 +1,4 @@
 #!perl
-#
-# This file is part of Template-ShowStartStop
-#
-# This software is Copyright (c) 2010 by Caleb Cushing.
-#
-# This is free software, licensed under:
-#
-#   The Artistic License 2.0
-#
-use strict;
-use warnings;
 
 use strict;
 use warnings;
@@ -34,13 +23,14 @@ find(
 
 my @scripts = glob "bin/*";
 
-plan tests => scalar(@modules) + scalar(@scripts);
+my $plan = scalar(@modules) + scalar(@scripts);
+$plan ? (plan tests => $plan) : (plan skip_all => "no tests to run");
 
 {
     # fake home for cpan-testers
     # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
 
-    like( qx{ $^X -Ilib -e "use $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" )
+    like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" )
         for sort @modules;
 
     SKIP: {