--- rat/lonambiguous.pm 2013/11/12 04:47:38 1.25 +++ rat/lonambiguous.pm 2014/12/11 01:13:24 1.26 @@ -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 @@ sub handler { 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;