Attempt to bless into a reference / breaks cas-starter cgiapp-starter [rt.cpan.org #71734]

[xsawyerx]

https://rt.cpan.org/Ticket/Display.html?id=71734

These two don't work with the newest Module::Starter

cgiapp-starter     Module::Starter::Plugin::CGIApp
cas-starter        CGI::Application::Structured::Tools

the last working version is PETDANCE/Module-Starter-1.54.tar.gz

if I go ahead and fix all these error message i get "No modules
specified." for "cgiapp-starter --module=MyCGIAppApp --author=author
--email=email"

please take a look



    --- lib/Module/Starter/Simple.pm~   2011-07-02 05:59:32.000000000 -0700
    +++ lib/Module/Starter/Simple.pm    2011-10-14 01:49:55.578125000 -0700
    @@ -49,7 +49,7 @@

     sub new {
         my $class = shift;
    -    return bless { @_ } => $class;
    +    return bless { @_ } => ref($class) || $class;
     }

     =head1 OBJECT METHODS



    --- lib/Module/Starter/BuilderSet.pm~       2011-07-02
05:59:32.000000000 -0700
    +++ lib/Module/Starter/BuilderSet.pm        2011-10-14
02:01:57.812500000 -0700
    @@ -53,7 +53,7 @@

     sub new {
         my $class = shift;
    -
    +    $class = ref($class) || $class;
         my $self =
           {
            'Module::Build' =>


    --- lib/Module/Starter/Plugin/Template.pm~  2011-07-02
05:59:37.000000000 -0700
    +++ lib/Module/Starter/Plugin/Template.pm   2011-10-14
02:03:53.921875000 -0700
    @@ -43,6 +43,7 @@

     sub new {
         my $class = shift;
    +    $class = ref($class) || $class;
         my $self  = $class->SUPER::new(@_);
         $self->{templates} = { $self->templates };
         $self->{renderer} = $self->renderer;




    --- lib/Module/Starter/Plugin/CGIApp.pm~    2010-03-06
19:01:02.000000000 -0800
    +++ lib/Module/Starter/Plugin/CGIApp.pm     2011-10-14
02:05:09.515625000 -0700
    @@ -64,6 +64,7 @@

     sub new {
         my ( $class, @opts ) = @_;
    +    $class = ref($class) || $class;
         my $self = $class->SUPER::new(@opts);

         $self->{templates} = { $self->templates };