--- loncom/lond 2008/02/29 21:01:03 1.397 +++ loncom/lond 2008/03/08 03:17:38 1.398 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.397 2008/02/29 21:01:03 raeburn Exp $ +# $Id: lond,v 1.398 2008/03/08 03:17:38 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -59,7 +59,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.397 $'; #' stupid emacs +my $VERSION='$Revision: 1.398 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -3498,8 +3498,7 @@ sub dump_course_id_handler { if ($hashref) { while (my ($key,$value) = each(%$hashref)) { my ($unesc_key,$lasttime_key,$lasttime,$is_hash,%val, - %unesc_val,$selfenroll_start,$selfenroll_end, - $selfenroll_types); + %unesc_val,$selfenroll_end,$selfenroll_types); $unesc_key = &unescape($key); if ($unesc_key =~ /^lasttime:/) { next; @@ -3519,13 +3518,9 @@ sub dump_course_id_handler { $unesc_val{'owner'} = $items->{'owner'}; $unesc_val{'type'} = $items->{'type'}; $selfenroll_types = $items->{'selfenroll_types'}; - $selfenroll_start = $items->{'selfenroll_start_date'}; $selfenroll_end = $items->{'selfenroll_end_date'}; if ($selfenrollonly) { next if (!$selfenroll_types); - if (($selfenroll_start > 0) && ($selfenroll_start > $now)) { - next; - } if (($selfenroll_end > 0) && ($selfenroll_end <= $now)) { next; }