From 687928ead25cb8f62fdfc58c2e126264e0fb149a Mon Sep 17 00:00:00 2001
From: joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Date: Tue, 8 May 2007 21:22:14 +0000
Subject: * Make testpagespec more robust, including checking for missing/bad  
 parameters, and detecting if a pagespec failed to compile.

---
 IkiWiki/Plugin/testpagespec.pm | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'IkiWiki/Plugin')

diff --git a/IkiWiki/Plugin/testpagespec.pm b/IkiWiki/Plugin/testpagespec.pm
index 4966f4e10..a0bb2ff31 100644
--- a/IkiWiki/Plugin/testpagespec.pm
+++ b/IkiWiki/Plugin/testpagespec.pm
@@ -12,6 +12,12 @@ sub import { #{{{
 sub preprocess (@) { #{{{
 	my %params=@_;
 	
+	foreach my $param (qw{match pagespec}) {
+		if (! exists $params{$param}) {
+			return "[[testpagespec missing $param parameter]]";
+		}
+	}
+
 	add_depends($params{page}, $params{pagespec});
 	
 	my $ret=pagespec_match($params{match}, $params{pagespec}, 
@@ -19,6 +25,9 @@ sub preprocess (@) { #{{{
 	if ($ret) {
 		return "match: $ret";
 	}
+	elsif (! defined $ret) {
+		return "match failed: $@";
+	}
 	else {
 		return "no match: $ret";
 	}
-- 
cgit v1.2.3