From bc6b985ccc8ac4bb7e5afa36dcfb1df9e5e47904 Mon Sep 17 00:00:00 2001
From: Simon Cozens <simon@simon-cozens.org>
Date: Sat, 24 Jan 2004 14:10:19 +0000
Subject: [PATCH] Silly bugs

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@7 48953598-375a-da11-a14b-00016c27c3ee
---
 lib/Apache/MVC/View/TT.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/Apache/MVC/View/TT.pm b/lib/Apache/MVC/View/TT.pm
index 30e0f89..9cdc0df 100644
--- a/lib/Apache/MVC/View/TT.pm
+++ b/lib/Apache/MVC/View/TT.pm
@@ -38,9 +38,9 @@ sub _args {
 
 sub process {
     my ($self, $r) = @_;
-    my $template = $self->_tt($r):
+    my $template = $self->_tt($r);
     my $output;
-    $template->process($r->template, { $self->_args($r) }, \$output);
+    $template->process($r->template, { $self->_args($r) }, \$output)
     || $self->error($r, $template->error);
     $r->{ar}->content_type("text/html");
     $r->{ar}->headers_out->set("Content-Length" => length $output);
@@ -51,7 +51,7 @@ sub process {
 
 sub error {
     my ($self, $r, $error) = @_;
-    $r->{ar}_>content_type("text/plain");
+    $r->{ar}->content_type("text/plain");
     $r->send_http_header;
     $r->print($error);
     return 500;
-- 
2.39.5