--- loncom/interface/londocs.pm 2013/09/23 17:35:07 1.565 +++ loncom/interface/londocs.pm 2013/10/06 20:33:45 1.566 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.565 2013/09/23 17:35:07 bisitz Exp $ +# $Id: londocs.pm,v 1.566 2013/10/06 20:33:45 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4997,7 +4997,8 @@ my %suporderhash = ( foreach my $server (keys(%servers)) { next if (grep(/^\Q$server\E$/,@ids)); my $hashid=$coursenum.':'.$coursedom; - &Apache::lonnet::remote_devalidate_cache($server,'suppcount',$hashid); + my $cachekey = &escape('suppcount').':'.&escape($hashid); + &Apache::lonnet::remote_devalidate_cache($server,[$cachekey]); } &Apache::lonnet::get_numsuppfiles($coursenum,$coursedom,1); undef($suppchanges);