From 67855afa02636e06b142c706487c5eb23efc5e8c Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Tue, 26 Apr 2011 18:55:42 +0000
Subject: added initial fcgi support to all the code files

---
 Xerl/Page/Document.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'Xerl/Page/Document.pm')

diff --git a/Xerl/Page/Document.pm b/Xerl/Page/Document.pm
index e2aacb1..13a8254 100644
--- a/Xerl/Page/Document.pm
+++ b/Xerl/Page/Document.pm
@@ -62,8 +62,11 @@ sub parse($) {
 
     my Xerl::Tools::FileIO $io = Xerl::Tools::FileIO->new( path => $path );
 
-    $io->fslurp();
-    $io->print();
+    if (-1 == $io->fslurp()) {
+	$config->set_shutdown(1);
+    } else {
+    	$io->print();
+    }
 
     return undef;
 }
-- 
cgit v1.2.3