Fix contest-matching regex in Pb::Entry

diff --git a/lib/Gruntmaster/Page/Pb/Entry.pm b/lib/Gruntmaster/Page/Pb/Entry.pm
index 0516053f7db69bcdeed547bd9e4c4f432a68f90e..f2fa9626c0aefd7298fb68ae076cc2be86e102fc 100644 (file)
--- a/lib/Gruntmaster/Page/Pb/Entry.pm
+++ b/lib/Gruntmaster/Page/Pb/Entry.pm
@@ -31,7 +31,7 @@ HTML
 sub _generate{
        my ($self, $htc, $path, $lang) = @_;
 
-       $path =~ m,(?:ct/([^/])+/)?pb/(\w+)\.html$,;
+       $path =~ m,(?:ct/([^/]+)/)?pb/(\w+)\.html$,;
 
        my ($contest, $id) = ($1, $2);