This is an automated email from the git hooks/post-receive script. ppm-guest pushed a commit to annotated tag v0.40 in repository libmath-prime-util-perl.
commit 2b7dae3935b094e2685de4e2928980677a65250a Author: Dana Jacobsen <d...@acm.org> Date: Thu Apr 3 11:44:30 2014 -0700 Concerns about each --- lib/Math/Prime/Util.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Math/Prime/Util.pm b/lib/Math/Prime/Util.pm index e6947cf..c083865 100644 --- a/lib/Math/Prime/Util.pm +++ b/lib/Math/Prime/Util.pm @@ -156,7 +156,8 @@ sub prime_get_config { # loaded. Your calls will probably die horribly. sub prime_set_config { my %params = (@_); # no defaults - while (my($param, $value) = each %params) { + foreach my $param (keys %params) { + my $value = $params{$param}; $param = lc $param; # dispatch table should go here. if ($param eq 'xs') { -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits