]> git.decadent.org.uk Git - maypole.git/blobdiff - lib/Apache/MVC/View/TT.pm
Silly bugs
[maypole.git] / lib / Apache / MVC / View / TT.pm
index 30e0f89030ca2e606654e9a376d1ff123e24e55e..9cdc0dfef450b147b4fadaa276e76379ff880230 100644 (file)
@@ -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;