[Jifty-commit] r4153 - in jifty/trunk: lib/Jifty/Plugin lib/Jifty/Plugin/LeakTracker

[jifty-commit at lists.jifty.org]

Author: sartak
Date: Wed Sep 26 14:57:39 2007
New Revision: 4153

Modified:
   jifty/trunk/   (props changed)
   jifty/trunk/lib/Jifty/Plugin/LeakTracker.pm
   jifty/trunk/lib/Jifty/Plugin/LeakTracker/Dispatcher.pm
   jifty/trunk/lib/Jifty/Plugin/LeakTracker/View.pm

Log:
 r42802 at onn:  sartak | 2007-09-18 17:01:23 -0400
 Move files from LeakDetector to LeakTracker (because that's the term Cat uses)


Modified: jifty/trunk/lib/Jifty/Plugin/LeakTracker.pm
==============================================================================
--- jifty/trunk/lib/Jifty/Plugin/LeakTracker.pm	(original)
+++ jifty/trunk/lib/Jifty/Plugin/LeakTracker.pm	Wed Sep 26 14:57:39 2007
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-package Jifty::Plugin::LeakTracker;
+package Jifty::Plugin::LeakDetector;
 use base qw/Jifty::Plugin Class::Data::Inheritable/;
 use Data::Dumper;
 use Devel::Events::Handler::ObjectTracker;
@@ -15,11 +15,6 @@
 
 my $empty_array = total_size([]);
 
-=head2 init
-
-init installs the triggers needed around each HTTP request
-=cut
-
 sub init {
     my $self = shift;
     return if $self->_pre_init;
@@ -33,13 +28,6 @@
     );
 }
 
-=head2 before_request
-
-This trigger sets up Devel::Events to instrument bless and free so it can keep
-track of all the objects created and destroyed in this request
-
-=cut
-
 sub before_request
 {
     my $self = shift;
@@ -51,14 +39,6 @@
     $self->generator->enable();
 }
 
-=head2 after_request
-
-This extracts all the data gathered by Devel::Events and puts it into the
-global C<@Jifty::Plugin::LeakTracker::requests> so the LeakTracker dispatcher
-and views can query it to make nice reports
-
-=cut
-
 sub after_request
 {
     my $self = shift;
@@ -88,7 +68,7 @@
 
 =head1 NAME
 
-Jifty::Plugin::LeakTracker
+Jifty::Plugin::LeakDetector
 
 =head1 DESCRIPTION
 
@@ -100,7 +80,7 @@
 
  framework:
    Plugins:
-     - LeakTracker: {}
+     - LeakDetector: {}
 
 This makes the following URLs available:
 
@@ -122,16 +102,6 @@
 non-administrators. The full Data::Dumper output of the objects
 leaked is available, which may of course contain sensitive information.
 
-=head1 SEE ALSO
-
-L<Jifty::Plugin::LeakTracker::View>, L<Jifty::Plugin::LeakTracker::Dispatcher>
-
-=head1 COPYRIGHT AND LICENSE
-
-Copyright 2007 Best Practical Solutions
-
-This is free software and may be modified and distributed under the same terms as Perl itself.
-
 =cut
 
 1;

Modified: jifty/trunk/lib/Jifty/Plugin/LeakTracker/Dispatcher.pm
==============================================================================
--- jifty/trunk/lib/Jifty/Plugin/LeakTracker/Dispatcher.pm	(original)
+++ jifty/trunk/lib/Jifty/Plugin/LeakTracker/Dispatcher.pm	Wed Sep 26 14:57:39 2007
@@ -1,4 +1,4 @@
-package Jifty::Plugin::LeakTracker::Dispatcher;
+package Jifty::Plugin::LeakDetector::Dispatcher;
 use warnings;
 use strict;
 
@@ -19,23 +19,11 @@
 # http://your.app/leaks/xxx -- display leak report for request ID xxx
 on 'leaks/#' => run {
     abort(404) if $1 < 1;
-    my $leak = $Jifty::Plugin::LeakTracker::requests[$1 - 1]
+    my $leak = $Jifty::Plugin::LeakDetector::requests[$1 - 1]
         or abort(404);
     set leak => $leak;
     show "leaks/one";
 };
 
-=head1 SEE ALSO
-
-L<Jifty::Plugin::LeakTracker>, L<Jifty::Plugin::LeakTracker::View>
-
-=head1 COPYRIGHT AND LICENSE
-
-Copyright 2007 Best Practical Solutions
-
-This is free software and may be modified and distributed under the same terms as Perl itself.
-
-=cut
-
 1;
 

Modified: jifty/trunk/lib/Jifty/Plugin/LeakTracker/View.pm
==============================================================================
--- jifty/trunk/lib/Jifty/Plugin/LeakTracker/View.pm	(original)
+++ jifty/trunk/lib/Jifty/Plugin/LeakTracker/View.pm	Wed Sep 26 14:57:39 2007
@@ -1,13 +1,13 @@
 use strict;
 use warnings;
 
-package Jifty::Plugin::LeakTracker::View;
+package Jifty::Plugin::LeakDetector::View;
 use Jifty::View::Declare -base;
 use Scalar::Util 'blessed';
 
 =head1 NAME
 
-Jifty::Plugin::LeakTracker::View - Views for memory leak detection
+Jifty::Plugin::LeakDetector::View - Views for memory leak detection
 
 =head1 TEMPLATES
 
@@ -46,7 +46,7 @@
                     th { "URL" }
                 };
 
-                for (@Jifty::Plugin::LeakTracker::requests)
+                for (@Jifty::Plugin::LeakDetector::requests)
                 {
                     next if $skip_zero && @{$_->{leaks}} == 0;
 
@@ -95,7 +95,7 @@
 
 =head1 SEE ALSO
 
-L<Jifty::Plugin::LeakTracker>, L<Jifty::Plugin::LeakTracker::Dispatcher>
+L<Jifty::Plugin::LeakDetector::Dispatcher>
 
 =head1 COPYRIGHT AND LICENSE