[LON-CAPA-cvs] cvs: loncom / lond

[raeburn]

raeburn		Fri May  8 12:02:40 2009 EDT

  Modified files:              
    /loncom	lond 
  Log:
  dump_domainroles_handler:
   start and end need to defined for roles to be filtered out  based on start date and/or end date.
  
  
Index: loncom/lond
diff -u loncom/lond:1.414 loncom/lond:1.415
--- loncom/lond:1.414	Mon May  4 10:23:02 2009
+++ loncom/lond	Fri May  8 12:02:39 2009
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.414 2009/05/04 10:23:02 foxr Exp $
+# $Id: lond,v 1.415 2009/05/08 12:02:39 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -59,7 +59,7 @@
 my $status='';
 my $lastlog='';
 
-my $VERSION='$Revision: 1.414 $'; #' stupid emacs
+my $VERSION='$Revision: 1.415 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid="default";
 my $currentdomainid;
@@ -4343,12 +4343,12 @@
             my ($start,$end) = split(/:/,&unescape($value));
             my ($trole,$uname,$udom,$runame,$rudom,$rsec) = split(/:/,&unescape($key));
             unless ($startfilter eq '.' || !defined($startfilter)) {
-                if ($start >= $startfilter) {
+                if ((defined($start)) && ($start >= $startfilter)) {
                     $match = 0;
                 }
             }
             unless ($endfilter eq '.' || !defined($endfilter)) {
-                if ($end <= $endfilter) {
+                if ((defined($end)) && ($end <= $endfilter)) {
                     $match = 0;
                 }
             }