[Catalyst-commits] r9317 - Catalyst-Devel/1.10/trunk/lib/Catalyst

[zarquon at dev.catalyst.perl.org]

Author: zarquon
Date: 2009-02-16 22:52:50 +0000 (Mon, 16 Feb 2009)
New Revision: 9317

Modified:
   Catalyst-Devel/1.10/trunk/lib/Catalyst/Helper.pm
Log:
provide a useful informational message at app creation

Modified: Catalyst-Devel/1.10/trunk/lib/Catalyst/Helper.pm
===================================================================
--- Catalyst-Devel/1.10/trunk/lib/Catalyst/Helper.pm	2009-02-16 20:27:18 UTC (rev 9316)
+++ Catalyst-Devel/1.10/trunk/lib/Catalyst/Helper.pm	2009-02-16 22:52:50 UTC (rev 9317)
@@ -159,6 +159,7 @@
         $self->_mk_server;
         $self->_mk_test;
         $self->_mk_create;
+        $self->_mk_information;
     }
     return $self->{dir};
 }
@@ -356,6 +357,11 @@
     $self->mk_file( $path, $output );
 }
 
+sub _mk_information {
+    my $self = shift;
+    print qq/Change to application directory and Run "perl Makefile.PL" to make sure your install is complete\n/;
+}
+
 sub _mk_dirs {
     my $self = shift;
     $self->mk_dir( $self->{dir} );