projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
b3d608b
)
fix that blank-page-instead-of-profiling-redirect-when-called-from-an-include bug...
author
ivan
<ivan>
Thu, 9 Mar 2006 13:42:40 +0000
(13:42 +0000)
committer
ivan
<ivan>
Thu, 9 Mar 2006 13:42:40 +0000
(13:42 +0000)
htetc/handler.pl
patch
|
blob
|
history
diff --git
a/htetc/handler.pl
b/htetc/handler.pl
index
15f9203
..
9b808e6
100644
(file)
--- a/
htetc/handler.pl
+++ b/
htetc/handler.pl
@@
-247,10
+247,8
@@
sub handler
sub redirect {
my( $location ) = @_;
sub redirect {
my( $location ) = @_;
- warn 'redir1 $m='.$m;
use vars qw($m);
$m->clear_buffer;
use vars qw($m);
$m->clear_buffer;
- warn 'redir3-prof';
#false laziness w/above
if ( defined(@DBIx::Profile::ISA) ) { #profiling redirect
#false laziness w/above
if ( defined(@DBIx::Profile::ISA) ) { #profiling redirect
@@
-267,14
+265,13
@@
sub handler
);
dbh->{'private_profile'} = {};
);
dbh->{'private_profile'} = {};
- warn 'redir9-prof';
- my $rv = $m->abort(200);
- warn "redir10-prof: $rv";
-
$rv
;
+ #whew. removing this is all that's needed to fix the annoying
+ #blank-page-instead-of-profiling-redirect-when-called-from-an-include
+ #bug triggered by mason 1.32
+
#my $rv = $m->abort(200)
;
} else { #normal redirect
} else { #normal redirect
- warn 'redir9-redirect';
$m->redirect($location);
}
$m->redirect($location);
}