--- loncom/lond 2009/10/19 23:16:36 1.429 +++ loncom/lond 2009/10/21 16:14:24 1.431 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.429 2009/10/19 23:16:36 raeburn Exp $ +# $Id: lond,v 1.431 2009/10/21 16:14:24 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.429 $'; #' stupid emacs +my $VERSION='$Revision: 1.431 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -3784,17 +3784,17 @@ sub dump_course_id_handler { $cc_clone{$clonedom.'_'.$clonenum} = 1; } } - if (defined($createdbefore)) { + if ($createdbefore ne '') { $createdbefore = &unescape($createdbefore); } else { $createdbefore = 0; } - if (defined($createdafter)) { + if ($createdafter ne '') { $createdafter = &unescape($createdafter); } else { $createdafter = 0; } - if (defined($creationcontext)) { + if ($creationcontext ne '') { $creationcontext = &unescape($creationcontext); } else { $creationcontext = '.'; @@ -3827,7 +3827,7 @@ sub dump_course_id_handler { my $items = &Apache::lonnet::thaw_unescape($value); if (ref($items) eq 'HASH') { if ($hashref->{$lasttime_key} eq '') { - next if ($since > 0); + next if ($since > 1); } $is_hash = 1; if (defined($clonerudom)) {