diff options
author | ivan <ivan> | 2006-07-16 00:55:06 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-07-16 00:55:06 +0000 |
commit | 580330233cbf32c58d9f29dc391bd2ebd83e16d5 (patch) | |
tree | 117d21cbaa15b43193432588516ad978254da167 /httemplate/autohandler | |
parent | 11f98403d0c7bf158ad0f71120e15c0bdf3d792c (diff) |
odds and ends
Diffstat (limited to 'httemplate/autohandler')
-rw-r--r-- | httemplate/autohandler | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/httemplate/autohandler b/httemplate/autohandler index ad0ab8ba6..a017eccb7 100644 --- a/httemplate/autohandler +++ b/httemplate/autohandler @@ -9,15 +9,18 @@ if ( UNIVERSAL::can(dbh, 'sprintProfile') ) { if ( lc($r->content_type) eq 'text/html' ) { - # barely worth it, just in case someone tries to use profiling on a - # non-RT install - eval "use Text::Wrapper;"; - die $@ if $@; + ## barely worth it, just in case someone tries to use profiling on a + ## non-RT install + #eval "use Text::Wrapper;"; + #die $@ if $@; my $wrapper = new Text::Wrapper( columns => 80 ); - + my $text = dbh->sprintProfile(); + #my $text = $wrapper->wrap( dbh->sprintProfile() ); + $text =~ s/^/ /mg; + $profile = '<PRE>'. - encode_entities( $wrapper->wrap( dbh->sprintProfile() ) ). + encode_entities( $text ). #"\n\n". &sprintAutoProfile(). '</PRE>'; "\n\n". '</PRE>'; } |