From 4fc4e78cd87926cd0f5e4a221ea6cf2c3ab0bb95 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Thu, 14 May 2015 10:40:52 -0400
Subject: sanitize nickname derived from email address

---
 IkiWiki.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'IkiWiki.pm')

diff --git a/IkiWiki.pm b/IkiWiki.pm
index 53eb8235b..dfdd0fe91 100644
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -1467,7 +1467,10 @@ sub openiduser ($) {
 sub emailuser ($) {
 	my $user=shift;
 	if (defined $user && $user =~ m/(.+)@/) {
-		return $1;
+		my $nick=$1;
+		# remove any characters from not allowed in wiki files
+		$nick=~s/[^$config{wiki_file_chars}]/_/g;
+		return $nick;
 	}
 	return;
 }
-- 
cgit v1.2.3