[pve-devel] r5266 - pve-common/trunk

[svn-commits at proxmox.com]

Author: dietmar
Date: 2010-10-12 11:12:28 +0000 (Tue, 12 Oct 2010)
New Revision: 5266

Modified:
   pve-common/trunk/RPCEnvironment.pm
Log:


Modified: pve-common/trunk/RPCEnvironment.pm
===================================================================
--- pve-common/trunk/RPCEnvironment.pm	2010-10-12 10:43:13 UTC (rev 5265)
+++ pve-common/trunk/RPCEnvironment.pm	2010-10-12 11:12:28 UTC (rev 5266)
@@ -77,7 +77,7 @@
 
     bless $self, $class;
 
-    foreach my $p (%params) {
+    foreach my $p (keys %params) {
 	if ($p eq 'atfork') {
 	    $self->{$p} = $params{$p};
 	} else {