diff Lib/Engine/Output/Page.pm @ 49:16ada169ca75

migrating to the Eclipse IDE
author wizard@linux-odin.local
date Fri, 26 Feb 2010 10:49:21 +0300
parents 03e58a454b20
children
line wrap: on
line diff
--- a/Lib/Engine/Output/Page.pm	Fri Feb 26 01:43:42 2010 +0300
+++ b/Lib/Engine/Output/Page.pm	Fri Feb 26 10:49:21 2010 +0300
@@ -1,34 +1,34 @@
-package Engine;
-our $Encoding;
-
-package Engine::Output::Page;
-use strict;
-
-use Common;
-use DOM;
-
-sub Print {
-    my ($class,$Query,$Action) = @_;
-    
-    if (DOM::Site->can('LoadPage')) {
-        my $pageId = $Action->RequestURI->path;
-        DOM::Site->RegisterObject("Request",$Action);
-        my $Page = DOM::Site->LoadPage($pageId);
-        print $Query->header(-status => 200);
-        undef $@;
-        eval {
-            $Page->Properties->{Encoding} = $Engine::Encoding;
-            $Page->Render(*STDOUT);
-        };
-        if ($@) {
-            print $Query->start_html('Error processing template');
-            print $Query->p("Page: $pageId");
-            print $Query->p("Error: $@");
-            print $Query->end_html;
-        }
-    } else {
-        die new Exception('The site doesn\'t support page output');
-    }
-}
-
-1;
+package Engine;
+our $Encoding;
+
+package Engine::Output::Page;
+use strict;
+
+use Common;
+use DOM;
+
+sub Print {
+    my ($class,$Query,$Action) = @_;
+    
+    if (DOM::Site->can('LoadPage')) {
+        my $pageId = $Action->RequestURI->path;
+        DOM::Site->RegisterObject("Request",$Action);
+        my $Page = DOM::Site->LoadPage($pageId);
+        print $Query->header(-status => 200);
+        undef $@;
+        eval {
+            $Page->Properties->{Encoding} = $Engine::Encoding;
+            $Page->Render(*STDOUT);
+        };
+        if ($@) {
+            print $Query->start_html('Error processing template');
+            print $Query->p("Page: $pageId");
+            print $Query->p("Error: $@");
+            print $Query->end_html;
+        }
+    } else {
+        die new Exception('The site doesn\'t support page output');
+    }
+}
+
+1;