[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

[raeburn]

raeburn		Tue Jan 23 15:00:38 2007 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  &get_course_users() categorizes the status of users with roles with no end date as 'active' instead of 'previous' (if start date has passed). 
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.502 loncom/interface/loncommon.pm:1.503
--- loncom/interface/loncommon.pm:1.502	Sat Jan 20 17:04:57 2007
+++ loncom/interface/loncommon.pm	Tue Jan 23 15:00:38 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.502 2007/01/20 22:04:57 raeburn Exp $
+# $Id: loncommon.pm,v 1.503 2007/01/23 20:00:38 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4952,7 +4952,7 @@
                     $usec = 'none';
                 }
                 if ($uname ne '' && $udom ne '') {
-                    if ($end < $now) {
+                    if ($end > 0 && $end < $now) {
                         $status = 'previous';
                     } elsif ($start > $now) {
                         $status = 'future';