[LON-CAPA-cvs] cvs: loncom /homework bridgetask.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 05 Oct 2005 20:25:00 -0000
albertel Wed Oct 5 16:25:00 2005 EDT
Modified files:
/loncom/homework bridgetask.pm
Log:
- lock keys were being considered as real queue entries
Index: loncom/homework/bridgetask.pm
diff -u loncom/homework/bridgetask.pm:1.67 loncom/homework/bridgetask.pm:1.68
--- loncom/homework/bridgetask.pm:1.67 Tue Oct 4 15:41:02 2005
+++ loncom/homework/bridgetask.pm Wed Oct 5 16:24:59 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: bridgetask.pm,v 1.67 2005/10/04 19:41:02 albertel Exp $
+# $Id: bridgetask.pm,v 1.68 2005/10/05 20:24:59 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1089,6 +1089,8 @@
sub pick_from_queue_data {
my ($queue,$check_section,$queuedata,$cdom,$cnum)=@_;
foreach my $key (keys(%$queuedata)) {
+ if ($key =~ /\0locked$/) { next; }
+ if ($key =~ /\0timestamp$/) { next; }
my ($symb,$uname,$udom)=&decode_queue_key($key);
if ($check_section) {
my $section=&Apache::lonnet::getsection($uname,$udom);