[LON-CAPA-cvs] cvs: rat / lonambiguous.pm

[raeburn]

raeburn		Thu Dec 11 01:13:25 2014 EDT

  Modified files:              
    /rat	lonambiguous.pm 
  Log:
  - Coding style: keys()
  
  
Index: rat/lonambiguous.pm
diff -u rat/lonambiguous.pm:1.25 rat/lonambiguous.pm:1.26
--- rat/lonambiguous.pm:1.25	Tue Nov 12 04:47:38 2013
+++ rat/lonambiguous.pm	Thu Dec 11 01:13:24 2014
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to resolve ambiguous file locations
 #
-# $Id: lonambiguous.pm,v 1.25 2013/11/12 04:47:38 raeburn Exp $
+# $Id: lonambiguous.pm,v 1.26 2014/12/11 01:13:24 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -87,7 +87,7 @@
        my $envkey;
        if (tie(%bighash,'GDBM_File',$env{'request.course.fn'}.'.db',
                     &GDBM_READER(),0640)) {
-          foreach $envkey (keys %env) {
+          foreach $envkey (keys(%env)) {
              if ($envkey=~/^form\.(\d+)\.(\d+)$/) {
 # ---------------------------------------------------- Update symb and redirect
 	         my $mapid=$1;