improve error message if shortcuts.mdwn DNE

1 files changed, 5 insertions, 2 deletions

diff --git a/IkiWiki/Plugin/shortcut.pm b/IkiWiki/Plugin/shortcut.pm
index 0e7769c67..fb096ecbd 100644
--- a/IkiWiki/Plugin/shortcut.pm
+++ b/IkiWiki/Plugin/shortcut.pm
@@ -13,8 +13,11 @@ sub import { #{{{
 sub checkconfig () { #{{{
 	# Preprocess the shortcuts page to get all the available shortcuts
 	# defined before other pages are rendered.
-	IkiWiki::preprocess("shortcuts", "shortcuts",
-		readfile(srcfile("shortcuts.mdwn")));
+	my $srcfile=eval {srcfile("shortcuts.mdwn")};
+	if (! defined $srcfile) {
+		error(gettext("shortcut plugin will not work without a shortcuts.mdwn"));
+	}
+	IkiWiki::preprocess("shortcuts", "shortcuts", readfile($srcfile));
 } # }}}
 
 sub preprocess_shortcut (@) { #{{{