From e910e67424aeaf56c547578af6c98914a7180811 Mon Sep 17 00:00:00 2001
From: joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Date: Fri, 24 Mar 2006 02:42:19 +0000
Subject: fixes

---
 IkiWiki/Setup.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'IkiWiki/Setup.pm')

diff --git a/IkiWiki/Setup.pm b/IkiWiki/Setup.pm
index 63659ce2e..0c8ad9208 100644
--- a/IkiWiki/Setup.pm
+++ b/IkiWiki/Setup.pm
@@ -9,8 +9,11 @@ sub setup () { # {{{
 	my $setup=possibly_foolish_untaint($config{setup});
 	delete $config{setup};
 	open (IN, $setup) || error("read $setup: $!\n");
-	local $/=undef;
-	my $code=<IN>;
+	my $code;
+	{
+		local $/=undef;
+		$code=<IN>;
+	}
 	($code)=$code=~/(.*)/s;
 	close IN;
 
-- 
cgit v1.2.3