X-Git-Url: http://git.cyclocoop.org/?p=ikiwiki%2Fpoll.git;a=blobdiff_plain;f=poll.pm;h=4a7b79b3f1565c381da74ed6d3dd791d37f3867a;hp=449e438a0df35af65a4e2ccac28d9a062b8194a0;hb=HEAD;hpb=e88b4e7fd0b30120941d04dd97c5616e842ce272 diff --git a/poll.pm b/poll.pm index 449e438..4a7b79b 100644 --- a/poll.pm +++ b/poll.pm @@ -64,8 +64,6 @@ sub scan (@) { my $userpage_best = bestlink($params{page}, $user); $userpage_best = (length $userpage_best > 0 ? $userpage_best : bestlink($userdir, $user)); $userpage_best = (length $userpage_best > 0 ? $userpage_best : ($user =~ m{/} ? '/' : $userdir).$user); - debug("user=$user"); - debug("userpage_best=$userpage_best"); add_link($params{page}, $userpage_best); } } @@ -266,7 +264,8 @@ sub sessioncgi ($$) { $params.=" 1 \"$choice\"" if length $choice; } - if (defined $oldchoice and not ($oldchoice eq $choice)) { + if (defined $oldchoice and not ($oldchoice eq $choice) + and not ($params=~/multiple=(\w+)/ & &IkiWiki::yesno($1))) { $params=~s/(^|\s+)(\d+)(="([^"]*)")?(\s+)"?\Q$oldchoice\E"?(\s+|$)/$1.$vote->('del', $2, $4)."$5\"$oldchoice\"".$6/es; } }