Add constants; refactor View classes and tests to use them; refactor out

[maypole.git] / lib / Maypole / View / TT.pm

diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm
index 15581e8a78cb1a40f2270952c14736391648dd54..0e8d89fbc1b2476f992c7aee9c57a1f7eafd3ea3 100644 (file)
--- a/lib/Maypole/View/TT.pm
+++ b/lib/Maypole/View/TT.pm
@@ -1,5 +1,6 @@
 package Maypole::View::TT;
 use base 'Maypole::View::Base';
+use Maypole::Constants;
 use Template;
 
 sub template {
@@ -8,10 +9,10 @@ sub template {
     my $output;
     if ($template->process($r->template, { $self->vars($r) }, \$output)) {
         $r->{output} = $output;
-        return 1;
+        return OK;
     } else {
         $r->{error} = $template->error;
-        return 0;
+        return ERROR;
     }
 }