From: Steinar H. Gunderson <sesse@debian.org>
Date: Thu, 26 Jul 2007 00:14:04 +0000 (+0200)
Subject: Yes, () in uploaded files too.
X-Git-Url: https://git.sesse.net/?p=pr0n;a=commitdiff_plain;h=5d9cbfab67405ce1806475bf211190e4427f0b56;ds=sidebyside

Yes, () in uploaded files too.
---

diff --git a/perl/Sesse/pr0n/WebDAV.pm b/perl/Sesse/pr0n/WebDAV.pm
index fe59930..9d57949 100644
--- a/perl/Sesse/pr0n/WebDAV.pm
+++ b/perl/Sesse/pr0n/WebDAV.pm
@@ -247,7 +247,7 @@ EOF
 EOF
 	
 			return Apache2::Const::OK;
-		} elsif ($r->uri =~ m#^/webdav/upload/([a-zA-Z0-9-]+)/([a-zA-Z0-9._-]+)$#) {
+		} elsif ($r->uri =~ m#^/webdav/upload/([a-zA-Z0-9-]+)/([a-zA-Z0-9._()-]+)$#) {
 			# stat a single file
 			my ($event, $filename) = ($1, $2);
 			my ($fname, $size, $mtime);