Import of FLORA/CatalystX-REPL-0.03 from CPAN.

gitpan-cpan-distribution: CatalystX-REPL
gitpan-cpan-version:      0.03
gitpan-cpan-path:         FLORA/CatalystX-REPL-0.03.tar.gz
gitpan-cpan-author:       FLORA
gitpan-cpan-maturity:     released

Changes

@@ -1,3 +1,6 @@
+0.03  Fri, 10 Apr 2009 01:47:22 +0200
+  * Allow passing options to Carp::REPL.
+
 0.02  Mon, 06 Apr 2009 22:28:52 +0100
   * Doc improvmens (Ash Berlin, spurned on by Jon Rockway)
 

META.yml

@@ -11,4 +11,4 @@ requires:
   Carp::REPL: 0
   Catalyst: 5.800006
   namespace::clean: 0
-version: 0.02
+version: 0.03

Makefile.PL

@@ -9,7 +9,7 @@ WriteMakefile(
   NAME      => 'CatalystX::REPL',
   AUTHOR    => 'Tomas\ Doran\ \<bobtfish\@bobtfish\.net\>\,\ Florian\ Ragwitz\ \<rafl\@debian\.org\>\,\ Ash\ Berlin\ \<ash\@cpan\.org\>',
   ABSTRACT  => 'read-eval-print-loop for debugging your Catalyst application',
-  VERSION   => '0.02',
+  VERSION   => '0.03',
   EXE_FILES => [ qw() ],
   (eval { ExtUtils::MakeMaker->VERSION(6.21) } ? (LICENSE => 'perl') : ()),
   PREREQ_PM    => {

README

@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution CatalystX-REPL, version
-0.02:
+0.03:
 
   read-eval-print-loop for debugging your Catalyst application
 

dist.ini

@@ -1,5 +1,5 @@
 name    = CatalystX-REPL
-version = 0.02
+version = 0.03
 author  = Tomas Doran <bobtfish@bobtfish.net>
 author  = Florian Ragwitz <rafl@debian.org>
 author  = Ash Berlin <ash@cpan.org>

lib/CatalystX/REPL.pm

@@ -1,5 +1,5 @@
 package CatalystX::REPL;
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 # ABSTRACT: read-eval-print-loop for debugging your Catalyst application
 
@@ -12,8 +12,9 @@ use namespace::clean -except => 'meta';
 
 after setup_finalize => sub {
     my ($self) = @_;
-    $SIG{__DIE__} = \&Carp::REPL::repl
+    if (my $repl_options = Catalyst::Utils::env_value($self, 'repl')) {
-        if Catalyst::Utils::env_value($self, 'repl');
+        Carp::REPL->import(split q{,}, $repl_options);
+    }
 };
 
 1;
@@ -25,7 +26,7 @@ CatalystX::REPL - read-eval-print-loop for debugging your Catalyst application
 
 =head1 VERSION
 
-version 0.02
+version 0.03
 
 =head1 SYNOPSIS
 
@@ -65,9 +66,14 @@ variables are set:
 
  $ $c
  MyApp=HASH(0xcea6ec)
- $ $c->req->uri          
+ $ $c->req->uri
  http://localhost/foo/bar
- $ 
+ $
+
+Options like C<warn> or C<nodie> can be passed to Carp::REPL by putting them,
+seperated by commas, into the environment variable:
+
+ MYAPP_REPL=warn,nodie ./script/myapp_server.pl
 
 Carp::REPL uses L<Devel::REPL> for the shell, so direct any questions how how
 to use or customize the repl at that module.

t/lib/TestApp.pm

@@ -1,5 +1,5 @@
 package TestApp;
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 
 use Moose;

t/lib/TestApp/Controller/Foo.pm

@@ -1,5 +1,5 @@
 package TestApp::Controller::Foo;
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 
 use Moose;