From: Joey Hess <joey@gnu.kitenet.net>
Date: Wed, 23 Sep 2009 18:56:18 +0000 (-0400)
Subject: avoid ugly messages when running ikiwiki -setup on a *directory*
X-Git-Tag: 3.14159265~3
X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/commitdiff_plain/3f5a646a41bf00cd9ad3d99be214434dee10787a?ds=inline

avoid ugly messages when running ikiwiki -setup on a *directory*
---

diff --git a/IkiWiki/Setup.pm b/IkiWiki/Setup.pm
index 6ee112096..8a25ecc57 100644
--- a/IkiWiki/Setup.pm
+++ b/IkiWiki/Setup.pm
@@ -20,8 +20,9 @@ sub load ($) {
 	my $code;
 	{
 		local $/=undef;
-		$code=<IN>;
+		$code=<IN> || error("$setup: $!");
 	}
+	
 	($code)=$code=~/(.*)/s;
 	close IN;