[Catalyst-commits] r10505 - in
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still:
. gsoc lib/Catalyst share share/root t t/lib
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Thu Jun 11 23:58:20 GMT 2009
Author: t0m
Date: 2009-06-11 23:58:20 +0000 (Thu, 11 Jun 2009)
New Revision: 10505
Added:
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/Makefile.PL.tt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_invocation.t
Removed:
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/TestAppForInvocation/
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/changes.tt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/config.tt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/lib/
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/makefile.tt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/readme.tt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_built.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_built_shadow.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_powered.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_powered_shadow.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_built.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_built_shadow.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_powered.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_powered_shadow.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/catalyst_logo.png.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/favicon.ico.bin
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/static/
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/script/
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/t/
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/lib/MyTestHelper.pm
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/version
Modified:
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/donelist.txt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/gsoc-devel-plan-5-23.txt
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/lib/Catalyst/Helper.pm
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/back_compat.t
Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_testapp_the_same.t
Log:
Merge HEAD:10428, less fucked
Modified: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/donelist.txt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/donelist.txt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/donelist.txt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -13,5 +13,3 @@
pulling data out of the __DATA__ section.
6. Drafted an RFC for more comments on progression of C::H API
7. Also using added Path::Class for file reading
-as of 6-9-09
-1. backwards compatibility tests pass
Modified: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/gsoc-devel-plan-5-23.txt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/gsoc-devel-plan-5-23.txt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/gsoc/gsoc-devel-plan-5-23.txt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -90,21 +90,18 @@
16:03 <t0m> and the ones which can't get deprecated, but preserved.
16:04 <dhoss> so that's just for the current get_file, right?
16:04 <t0m> yy
-########################################################################
-## done
-16:04 <t0m> $self->copy_share_file(
+16:04 <t0m> $self->copy_share_file(
16:04 <t0m> 'favicon.ico',
16:04 <t0m> File::Spec->catfile( $self->{root}, "favicon.ico" )
16:04 <t0m> );
-#########################################################################
16:05 <t0m> more like it
16:05 <t0m> so we have sub mk_foo { shift->generate_foo(@_); }
====
5-28
-03:04 < dhoss> SO. official next step: 1) #done trim crap out 2) #done write test for how
+03:04 < dhoss> SO. official next step: 1) trim crap out 2) write test for how
helpers are invoking Catalyst::Helper 3)??? 4) profit!
-03:05 < t0m> 3)#done Re arrange files in sharedir so we can make the comversion guts
+03:05 < t0m> 3) Re arrange files in sharedir so we can make the comversion guts
totally generic
03:05 < t0m> 4) merge&profit
03:05 < t0m> *conversion
@@ -118,59 +115,5 @@
the one in topic
03:06 < t0m> cause then the entire generate application becomes 'copy this
directory from X => Y, applying some file mangling rules)
-
-=============================================================================
-04:26 < t0m> dhoss: erm, yeah - so the two things to do is: unit tests for the
- methods like get_file which we're not actually using any more..
-04:27 < t0m> (do that by making t/lib/ExampleHelper.pm - copy the TT one from
- CPAN or something, and then write some tests that get_file can
- successfully pull chunks out the __DATA__ segment
-04:28 < t0m> and rename everything in the sharedir to be named as-per where it
- ends up in your app, but suffixed by .tt or .bin
-04:29 < t0m> e.g. share/Makefile.PL.tt share/root/favicon.ico.bin
- share/lib/MyApp.pm.tt
-04:30 < t0m> the exact reasons for this nameing scheme become aparent post
- first merge, when we remove most of the code :)
-04:30 < t0m> but all of share/ needs to be in it's final resting place pre-merge
-04:31 < marcus> http://lumberjaph.net/blog/index.php/2009/05/30/catalystxdispatcherasgraph/ # <3 lazyweb
-04:31 < t0m> so tests the stuff we're no longer using in Helper.pm (e.g.
- get_file) still works. Rename share/ bits
-04:31 < t0m> marcus: Indeed :)
-04:31 < t0m> ^^ those two, then first merge.
-23:36 <@kd> dhoss: just found a bug in ::Devel ...
-23:36 <@kd> we're using #!/usr/bin/env perl now
-23:36 <@kd> that means we have to add the use warnings; pragma beneath it
-23:37 <@kd> that doesn't appear to be happeining in the scripts
-23:37 <@kd> please fix
-23:38 <@kd> dhoss: i.e. http://gist.github.com/122081
-==============================================================================
-# DONE
-1. Rename everything into final layout:
- . tt files all named .tt
- . none tt files all named .bin
- . directory structure as generated, e.g. share/lib/MyApp.pm.tt, share/root/favicon.ico.bin
-2. get new layout working
-
-
-# DONE
-3. get tests for back compat - i.e. the methods no longer used in Helper.pm like 'get_file'
- . copy Catalyst::Helper::View::TT into t/lib/TestBackCompat.pm
- . write test t/deprecated_methods_backcompat.t which says:
- use FindBin qw/$Bin/;
- use lib "$Bin/lib";
- use Test::More tests => 1;
-
- my $helper = TestBackCompat->new( %maybe_some_params_here );
- my $a_section = $helper->get_file('FileName');
- is $a_section, 'FILECONTENTSFROM__DATA__';
-
-3. RFC - DONE
-
-Looking ahead
-
-MooseX::Getopt
-
-
-
Modified: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/lib/Catalyst/Helper.pm
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/lib/Catalyst/Helper.pm 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/lib/Catalyst/Helper.pm 2009-06-11 23:58:20 UTC (rev 10505)
@@ -15,10 +15,7 @@
use Catalyst::Exception;
use Path::Class qw/dir file/;
use File::ShareDir qw/dist_dir/;
-use Moose;
-use aliased 'Path::Class::Dir';
-
my %cache;
=head1 NAME
@@ -35,15 +32,8 @@
sub get_sharedir_file {
my ($self, @filename) = @_;
- my $dist_dir;
- if (-d "inc/.author") { # Can't use sharedir if we're in a checkout
- # this feels horrible, better ideas?
- $dist_dir = 'share';
- }
- else {
- $dist_dir = dist_dir('Catalyst-Devel');
- }
- my $file = file( $dist_dir, @filename);
+ my $file = file( dist_dir('Catalyst-Devel'), @filename);
+ warn $file;
my $contents = $file->slurp;
return $contents;
}
@@ -226,7 +216,7 @@
sub mk_file {
my ( $self, $file, $content ) = @_;
- if ( -e $file && -s _ ) {
+ if ( -e $file ) {
print qq/ exists "$file"\n/;
return 0
unless ( $self->{'.newfiles'}
@@ -271,30 +261,17 @@
}
# Do not touch this method, *EVER*, it is needed for back compat.
-## addendum: we had to split this method so we could have backwards
-## compatability. otherwise, we'd have no way to pass stuff from __DATA__
sub render_file {
my ( $self, $file, $path, $vars ) = @_;
- my $template = $self->get_file( ( caller(0) )[0], $file );
- $self->render_file_contents($template, $path, $vars);
-}
-
-sub render_sharedir_file {
- my ( $self, $file, $path, $vars ) = @_;
- my $template = $self->get_sharedir_file( $file );
- $self->render_file_contents($template, $path, $vars);
-}
-
-sub render_file_contents {
- my ( $self, $template, $path, $vars ) = @_;
$vars ||= {};
my $t = Template->new;
+ my $template = $self->get_sharedir_file( 'root', $file );
return 0 unless $template;
my $output;
$t->process( \$template, { %{$self}, %$vars }, \$output )
|| Catalyst::Exception->throw(
- message => qq/Couldn't process "$template", / . $t->error() );
+ message => qq/Couldn't process "$file", / . $t->error() );
$self->mk_file( $path, $output );
}
@@ -361,7 +338,7 @@
$self->{path} = File::Spec->catfile( 'lib', split( '::', $self->{name} ) );
$self->{path} .= '.pm';
my $dir = $self->{dir};
- $self->render_file( 'makefile.tt', "$dir\/Makefile.PL" );
+ $self->render_file( 'Makefile.PL.tt', "$dir\/Makefile.PL" );
if ( $self->{makefile} ) {
@@ -495,42 +472,6 @@
}
}
-
-## this is so you don't have to do make install after every change to test
-sub _find_share_dir {
- my ($self, $args) = @_;
- my $share_name = $self->name;
- if ($share_name =~ s!^/(.*?)/!!) {
- my $dist = $1;
- $args->{share_base_dir} = eval {
- Dir->new(File::ShareDir::dist_dir($dist))
- ->subdir('share');
- };
- if ($@) {
- # not installed
- my $file = __FILE__;
- my $dir = Dir->new(dirname($file));
- my $share_base;
- while ($dir->parent) {
- if (-d $dir->subdir('share') && -d $dir->subdir('share')->subdir('root')) {
- $share_base = $dir->subdir('share')->subdir('root');
- last;
- }
- $dir = $dir->parent;
- }
- confess "could not find sharebase by recursion. ended up at $dir, from $file"
- unless $share_base;
- $args->{share_base_dir} = $share_base;
- }
- }
- my $base = $args->{share_base_dir}->subdir($share_name);
- confess "No such share base directory ${base}"
- unless -d $base;
- $self->share_dir($base);
-};
-
-
-
=head1 DESCRIPTION
This module is used by B<catalyst.pl> to create a set of scripts for a
Copied: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/Makefile.PL.tt (from rev 10454, Catalyst-Devel/1.00/branches/helper_refactor/share/makefile.tt)
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/Makefile.PL.tt (rev 0)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/Makefile.PL.tt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -0,0 +1,20 @@
+[% startperl %]
+# IMPORTANT: if you delete this file your app will not work as
+# expected. You have been warned.
+use inc::Module::Install;
+
+name '[% dir %]';
+all_from '[% path %]';
+
+requires 'Catalyst::Runtime' => '[% catalyst_version %]';
+requires 'Catalyst::Plugin::ConfigLoader';
+requires 'Catalyst::Plugin::Static::Simple';
+requires 'Catalyst::Action::RenderView';
+requires 'parent';
+requires 'Config::General'; # This should reflect the config file format you've chosen
+ # See Catalyst::Plugin::ConfigLoader for supported formats
+catalyst;
+
+install_script glob('script/*.pl');
+auto_install;
+WriteAll;
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/changes.tt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/changes.tt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/changes.tt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -1,4 +0,0 @@
-This file documents the revision history for Perl extension [% name %].
-
-0.01 [% time %]
- - initial revision, generated by Catalyst
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/config.tt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/config.tt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/config.tt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -1,3 +0,0 @@
-# rename this file to [% name %].yml and put a ':' in front of 'name' if
-# you want to use YAML like in old versions of Catalyst
-name [% name %]
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/makefile.tt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/makefile.tt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/makefile.tt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -1,20 +0,0 @@
-[% startperl %]
-# IMPORTANT: if you delete this file your app will not work as
-# expected. You have been warned.
-use inc::Module::Install;
-
-name '[% dir %]';
-all_from '[% path %]';
-
-requires 'Catalyst::Runtime' => '[% catalyst_version %]';
-requires 'Catalyst::Plugin::ConfigLoader';
-requires 'Catalyst::Plugin::Static::Simple';
-requires 'Catalyst::Action::RenderView';
-requires 'parent';
-requires 'Config::General'; # This should reflect the config file format you've chosen
- # See Catalyst::Plugin::ConfigLoader for supported formats
-catalyst;
-
-install_script glob('script/*.pl');
-auto_install;
-WriteAll;
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/readme.tt
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/readme.tt 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/readme.tt 2009-06-11 23:58:20 UTC (rev 10505)
@@ -1 +0,0 @@
-Run script/[% appprefix %]_server.pl to test the application.
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_built.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_built_shadow.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_powered.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_120x50_powered_shadow.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_built.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_built_shadow.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_powered.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/btn_88x31_powered_shadow.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/catalyst_logo.png.bin
===================================================================
(Binary files differ)
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/share/root/favicon.ico.bin
===================================================================
(Binary files differ)
Modified: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/back_compat.t
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/back_compat.t 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/back_compat.t 2009-06-11 23:58:20 UTC (rev 10505)
@@ -21,20 +21,13 @@
is $example1, 'foobar[% test_var %]';
is $example2, 'bazquux';
-package MyTestHelper;
-
-use Test::More;
-use File::Temp qw/tempfile/;
-
my ($fh, $fn) = tempfile;
-close $fh;
-$helper->render_file('example1', $fn, { test_var => 'test_val' });
-open $fh, $fn or die $@;
-#seek $fh, 0, 0; # Rewind
+$helper->render_file($fn, { test_var => 'test_val' });
+seek $fh, 0, 0; # Rewind
my $contents;
{
local $/;
$contents = <$fh>;
}
warn $contents;
-is $contents, "foobartest_val\n";
+is $contents, 'foobartest_val';
Copied: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_invocation.t (from rev 10480, Catalyst-Devel/1.00/branches/helper_refactor/t/check_invocation.t)
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_invocation.t (rev 0)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_invocation.t 2009-06-11 23:58:20 UTC (rev 10505)
@@ -0,0 +1,32 @@
+use strict;
+use warnings;
+
+use FindBin qw/$Bin/;
+use Test::More tests => 1;
+
+use lib "$Bin/../lib";
+
+use Catalyst::Helper;
+
+my $force = 0;
+my $help = 0;
+my $makefile = 0;
+my $scripts = 0;
+my $short = 0;
+
+my $helper = Catalyst::Helper->new(
+ {
+ '.newfiles' => !$force,
+ 'makefile' => $makefile,
+ 'scripts' => $scripts,
+ 'short' => $short,
+ }
+);
+
+sub mk_compclass {
+ my ( $self, $helper ) = @_;
+ my $file = $helper->{file};
+ $helper->render_file( 'compclass.tt', $file );
+}
+
+ok( $helper->mk_app("TestAppForInvocation"), "app invocation still works");
Modified: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_testapp_the_same.t
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_testapp_the_same.t 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/check_testapp_the_same.t 2009-06-11 23:58:20 UTC (rev 10505)
@@ -19,7 +19,7 @@
my $diff;
eval {
- $diff = `diff -urNB -x .svn -x Changes $Bin/TestAppForComparison $Bin/../TestAppForComparison`;
+ $diff = `diff -urN -x .svn -x Changes $Bin/TestAppForComparison $Bin/../TestAppForComparison`;
};
skip "no diff program installed, skipping", 1 if $@;
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/lib/MyTestHelper.pm
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/lib/MyTestHelper.pm 2009-06-11 23:57:38 UTC (rev 10504)
+++ Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/t/lib/MyTestHelper.pm 2009-06-11 23:58:20 UTC (rev 10505)
@@ -1,15 +0,0 @@
-package MyTestHelper;
-use base qw/Catalyst::Helper/;
-
-sub example_render {
- my ($self, $fn, $vars) = @_;
- $self->render_file('example1', $fn, $vars);
-}
-
-1;
-
-__DATA__
-__example1__
-foobar[% test_var %]
-__example2__
-bazquux
Deleted: Catalyst-Devel/1.00/branches/helper_refactor_actuall_passing_the_fucking_tests_still/version
===================================================================
More information about the Catalyst-commits
mailing list