Compare commits
1 Commits
cpan_path/
...
cpan_versi
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
6b402d3357 |
3
Changes
3
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)
|
||||
|
||||
|
||||
2
META.yml
2
META.yml
@@ -11,4 +11,4 @@ requires:
|
||||
Carp::REPL: 0
|
||||
Catalyst: 5.800006
|
||||
namespace::clean: 0
|
||||
version: 0.02
|
||||
version: 0.03
|
||||
|
||||
@@ -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 => {
|
||||
|
||||
2
README
2
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
|
||||
|
||||
|
||||
2
dist.ini
2
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>
|
||||
|
||||
@@ -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 Catalyst::Utils::env_value($self, 'repl');
|
||||
if (my $repl_options = 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.
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
package TestApp;
|
||||
our $VERSION = '0.02';
|
||||
our $VERSION = '0.03';
|
||||
|
||||
|
||||
use Moose;
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
package TestApp::Controller::Foo;
|
||||
our $VERSION = '0.02';
|
||||
our $VERSION = '0.03';
|
||||
|
||||
|
||||
use Moose;
|
||||
|
||||
Reference in New Issue
Block a user