From 2c757d7db4cb6a7b9655de13206fcc84fb7ce61f Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 14 May 2006 16:47:31 +0000 Subject: first part of ACL and re-skinning work and some other small stuff --- httemplate/autohandler | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'httemplate/autohandler') diff --git a/httemplate/autohandler b/httemplate/autohandler index a3f7eb008..ad0ab8ba6 100644 --- a/httemplate/autohandler +++ b/httemplate/autohandler @@ -9,7 +9,15 @@ if ( UNIVERSAL::can(dbh, 'sprintProfile') ) { if ( lc($r->content_type) eq 'text/html' ) { - $profile = '
'. encode_entities(dbh->sprintProfile()).
+    # 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 );
+
+    $profile = '
'.
+               encode_entities( $wrapper->wrap( dbh->sprintProfile() ) ).
                #"\n\n". &sprintAutoProfile(). '
'; "\n\n". '
'; } -- cgit v1.2.1 From 580330233cbf32c58d9f29dc391bd2ebd83e16d5 Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 16 Jul 2006 00:55:06 +0000 Subject: odds and ends --- httemplate/autohandler | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'httemplate/autohandler') 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 = '
'.
-               encode_entities( $wrapper->wrap( dbh->sprintProfile() ) ).
+               encode_entities( $text ).
                #"\n\n". &sprintAutoProfile(). '
'; "\n\n". ''; } -- cgit v1.2.1 From 9b55529944da1d3b8dd09d7148d888493960a5ea Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 20 Nov 2006 03:05:52 +0000 Subject: bug fix for open transactions --- httemplate/autohandler | 3 +++ 1 file changed, 3 insertions(+) (limited to 'httemplate/autohandler') diff --git a/httemplate/autohandler b/httemplate/autohandler index a017eccb7..bdea50534 100644 --- a/httemplate/autohandler +++ b/httemplate/autohandler @@ -30,3 +30,6 @@ if ( UNIVERSAL::can(dbh, 'sprintProfile') ) { s/(<\/BODY>[\s\n]*<\/HTML>[\s\n]*)$/$profile$1/i; +<%cleanup> + dbh->commit(); + -- cgit v1.2.1