From: Julien Moutinho Date: Mon, 21 Apr 2014 15:09:48 +0000 (+0200) Subject: Correction : n’impose pas de / avant $config{userdir} . X-Git-Url: http://git.cyclocoop.org/?p=ikiwiki%2Fpoll.git;a=commitdiff_plain;h=d139cab645d18db9577e982cc07274294582a0a2 Correction : n’impose pas de / avant $config{userdir} . --- diff --git a/poll.pm b/poll.pm index 411f3bd..f9fc878 100644 --- a/poll.pm +++ b/poll.pm @@ -124,7 +124,7 @@ sub preprocess (@) { if (@{$choices{$choice}{users}} > 0) { $votes .= " : ".join(', ', map { my $userpage = linkpage(($config{userdir}?$config{userdir}.'/':'').$_); - htmllink($params{page}, $params{destpage}, '/'.$userpage, linktext => pagetitle($_)) + htmllink($params{page}, $params{destpage}, $userpage, linktext => pagetitle($_)) } @{$choices{$choice}{users}}); $votes .= " + ".$choices{$choice}{unknown_votes}." " . ($choices{$choice}{unknown_votes} > 1 ? gettext("unknowns") : gettext("unknown"))