Browse files

[Any-list.pm] removed Int constraint on $num in .pick

  • Loading branch information...
1 parent f5065b6 commit 6bf017930e6a020312229abdce7c93bf5ff7f857 @masak masak committed Nov 20, 2009
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/setting/Any-list.pm
View
4 src/setting/Any-list.pm
@@ -48,9 +48,9 @@ class Any is also {
}
}
- multi method pick(Int $num is copy = 1, :$replace) {
+ multi method pick($num is copy = 1, :$replace) {
- $num=floor($num);
+ $num .= floor;
if ($num == 1) {
return @.list[floor(@.list.elems.rand)];

0 comments on commit 6bf0179

Please sign in to comment.