[svn:dbi] r9594 - in dbi/trunk: . lib/DBI/ProfileDumper

[timbo]

Author: timbo
Date: Wed May 23 01:58:15 2007
New Revision: 9594

Modified:
   dbi/trunk/Changes
   dbi/trunk/lib/DBI/ProfileDumper/Apache.pm

Log:
Fix typo


Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes   (original)
+++ dbi/trunk/Changes   Wed May 23 01:58:15 2007
@@ -37,6 +37,8 @@
 
 =head2 Changes in DBI 1.57 (svn rev XXX),  XX May 2007
 
+XXX Add a DBI_REVISION macro that drivers can use
+
   Fixed unused var compiler warning thanks to JDHEDDEN.
 
   Added support for !Time and !Time~N to DBI::Profile Path.

Modified: dbi/trunk/lib/DBI/ProfileDumper/Apache.pm
==============================================================================
--- dbi/trunk/lib/DBI/ProfileDumper/Apache.pm   (original)
+++ dbi/trunk/lib/DBI/ProfileDumper/Apache.pm   Wed May 23 01:58:15 2007
@@ -1,5 +1,7 @@
 package DBI::ProfileDumper::Apache;
 
+use strict;
+
 =head1 NAME
 
 DBI::ProfileDumper::Apache - capture DBI profiling data from Apache/mod_perl
@@ -158,7 +160,8 @@
 
 
 sub filename {
-    my $filename = shift->SUPER::filename(@_);
+    my $self = shift;
+    my $filename = $self->SUPER::filename(@_);
     # to be able to identify groups of profile files from the same set of
     # apache processes, we include the parent pid in the file name
     # as well as the pid.
@@ -196,7 +199,7 @@
 sub flush_to_disk {
     my $self = shift;
 
-    printf STDERR ref($self)." writing to %s\n", $self->filename();
+    printf STDERR ref($self)." writing to %s\n", $self->filename()
         unless $self->{Quiet};
 
     return $self->SUPER::flush_to_disk(@_);