add test for nonexistant polygen

2006-07-30 21:54:03 +00:00 · 2006-07-30 21:54:03 +00:00 · 26c2c63c97
parent 73e6f81ef3
commit 26c2c63c97
1 changed files with 3 additions and 0 deletions
--- a/IkiWiki/Plugin/polygen.pm
+++ b/IkiWiki/Plugin/polygen.pm
@ -27,6 +27,9 @@ sub preprocess (@) { #{{{
 	$symbol =~ s/[^A-Za-z0-9]//g if defined $symbol;

 	my $grmfile = '/usr/share/polygen/ita/polygen.grm';
+	if (! -d '/usr/share/polygen') {
+		return "[[polygen not installed]]";
+	}
 	find({wanted => sub {
 			if (substr($File::Find::name, -length($grammar)) eq $grammar) {
 				$grmfile = IkiWiki::possibly_foolish_untaint($File::Find::name);