rename DebugScreen to StackTrace

ray1729 · Oct 7, 2009 · 4422b76 · 4422b76
1 parent 5b57365
commit 4422b76
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 10 deletions.
diff --git a/lib/Plack/Middleware/DebugScreen.pm → lib/Plack/Middleware/StackTrace.pm b/lib/Plack/Middleware/DebugScreen.pm → lib/Plack/Middleware/StackTrace.pm
@@ -1,4 +1,4 @@
-package Plack::Middleware::DebugScreen;
+package Plack::Middleware::StackTrace;
 use strict;
 use warnings;
 use base qw/Plack::Middleware/;
@@ -37,11 +37,11 @@ __END__
 
 =head1 NAME
 
-Plack::Middleware::DebugScreen - Displays stack trace when your app dies
+Plack::Middleware::StackTrace - Displays stack trace when your app dies
 
 =head1 SYNOPSIS
 
-  enable Plack::Middleware::DebugScreen;
+  enable Plack::Middleware::StackTrace;
 
 =head1 DESCRIPTION
 

diff --git a/scripts/plackup b/scripts/plackup
@@ -31,8 +31,8 @@ lib->import(@includes) if @includes;
 my $handler = Plack::Util::load_psgi $app;
 
 if ($env eq 'development') {
-    if (eval "require Plack::Middleware::DebugScreen; 1") {
-        $handler = Plack::Middleware::DebugScreen->wrap($handler);
+    if (eval "require Plack::Middleware::StackTrace; 1") {
+        $handler = Plack::Middleware::StackTrace->wrap($handler);
     }
     require Plack::Middleware::AccessLog;
     $handler = Plack::Middleware::AccessLog->wrap(logger => sub { print STDERR @_ }, $handler);
@@ -104,7 +104,7 @@ Specify perl library include path, like C<perl>'s -I option.
 
 Specify the environment option (default is C<development>). If it's
 set to C<development>, following middleware is enabled by default:
-L<CommonLogger>, L<DebugScreen>.
+L<CommonLogger>, L<StackTrace>.
 
 =back
 

diff --git a/t/Plack-Middleware/order.t b/t/Plack-Middleware/order.t
@@ -1,12 +1,12 @@
 use strict;
 use Test::Requires qw( CGI::ExceptionManager );
-use Plack::Middleware qw( XFramework DebugScreen );
+use Plack::Middleware qw( XFramework StackTrace );
 use Plack::Builder;
 use Test::More;
 
 my $handler = builder {
     enable Plack::Middleware::XFramework framework => 'Dog';
-    enable Plack::Middleware::DebugScreen;
+    enable Plack::Middleware::StackTrace;
     sub {
         die "Oops";
     };

diff --git a/t/Plack-Middleware/debugscreen.t → t/Plack-Middleware/stacktrace.t b/t/Plack-Middleware/debugscreen.t → t/Plack-Middleware/stacktrace.t
@@ -2,9 +2,9 @@ use strict;
 use warnings;
 use Test::More;
 use Test::Requires qw( CGI::ExceptionManager );
-use Plack::Middleware::DebugScreen;
+use Plack::Middleware::StackTrace;
 
-my $handler = Plack::Middleware::DebugScreen->wrap(sub { die "orz" });
+my $handler = Plack::Middleware::StackTrace->wrap(sub { die "orz" });
 my $res = $handler->(+{});
 is scalar(@$res), 3;
 is $res->[0], 500;