From: Joey Hess <joey@kitenet.net>
Date: Sat, 22 Jan 2011 14:06:17 +0000 (-0400)
Subject: fix uninitilized value warning on bad page name
X-Git-Url: https://scripts.mit.edu/gitweb/www/ikiwiki.git/commitdiff_plain/5d3998555ffbeb1c20b84dd4cdc46c825c07bec8?ds=sidebyside

fix uninitilized value warning on bad page name
---

diff --git a/IkiWiki/Plugin/editpage.pm b/IkiWiki/Plugin/editpage.pm
index df29bcc98..8c78e853c 100644
--- a/IkiWiki/Plugin/editpage.pm
+++ b/IkiWiki/Plugin/editpage.pm
@@ -91,12 +91,12 @@ sub cgi_editpage ($$) {
 	# This untaint is safe because we check file_pruned and
 	# wiki_file_regexp.
 	my ($page)=$form->field('page')=~/$config{wiki_file_regexp}/;
-	$page=possibly_foolish_untaint($page);
-	my $absolute=($page =~ s#^/+##); # absolute name used to force location
 	if (! defined $page || ! length $page ||
 	    file_pruned($page)) {
 		error(gettext("bad page name"));
 	}
+	$page=possibly_foolish_untaint($page);
+	my $absolute=($page =~ s#^/+##); # absolute name used to force location
 
 	my $baseurl = urlto($page);