[Jifty-commit] r4154 - in jifty/trunk: lib/Jifty/Plugin
lib/Jifty/Plugin/LeakTracker
jifty-commit at lists.jifty.org
jifty-commit at lists.jifty.org
Wed Sep 26 14:57:48 EDT 2007
Author: sartak
Date: Wed Sep 26 14:57:48 2007
New Revision: 4154
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:
r42803 at onn: sartak | 2007-09-18 17:02:47 -0400
Fix package names, add copyright notices
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:48 2007
@@ -1,7 +1,7 @@
use strict;
use warnings;
-package Jifty::Plugin::LeakDetector;
+package Jifty::Plugin::LeakTracker;
use base qw/Jifty::Plugin Class::Data::Inheritable/;
use Data::Dumper;
use Devel::Events::Handler::ObjectTracker;
@@ -68,7 +68,7 @@
=head1 NAME
-Jifty::Plugin::LeakDetector
+Jifty::Plugin::LeakTracker
=head1 DESCRIPTION
@@ -80,7 +80,7 @@
framework:
Plugins:
- - LeakDetector: {}
+ - LeakTracker: {}
This makes the following URLs available:
@@ -102,6 +102,16 @@
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:48 2007
@@ -1,4 +1,4 @@
-package Jifty::Plugin::LeakDetector::Dispatcher;
+package Jifty::Plugin::LeakTracker::Dispatcher;
use warnings;
use strict;
@@ -19,11 +19,23 @@
# http://your.app/leaks/xxx -- display leak report for request ID xxx
on 'leaks/#' => run {
abort(404) if $1 < 1;
- my $leak = $Jifty::Plugin::LeakDetector::requests[$1 - 1]
+ my $leak = $Jifty::Plugin::LeakTracker::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:48 2007
@@ -1,13 +1,13 @@
use strict;
use warnings;
-package Jifty::Plugin::LeakDetector::View;
+package Jifty::Plugin::LeakTracker::View;
use Jifty::View::Declare -base;
use Scalar::Util 'blessed';
=head1 NAME
-Jifty::Plugin::LeakDetector::View - Views for memory leak detection
+Jifty::Plugin::LeakTracker::View - Views for memory leak detection
=head1 TEMPLATES
@@ -46,7 +46,7 @@
th { "URL" }
};
- for (@Jifty::Plugin::LeakDetector::requests)
+ for (@Jifty::Plugin::LeakTracker::requests)
{
next if $skip_zero && @{$_->{leaks}} == 0;
@@ -95,7 +95,7 @@
=head1 SEE ALSO
-L<Jifty::Plugin::LeakDetector::Dispatcher>
+L<Jifty::Plugin::LeakTracker>, L<Jifty::Plugin::LeakTracker::Dispatcher>
=head1 COPYRIGHT AND LICENSE
More information about the Jifty-commit
mailing list