--- loncom/interface/lonrequestcourse.pm	2009/12/20 01:58:48	1.41.2.2
+++ loncom/interface/lonrequestcourse.pm	2010/02/04 21:01:30	1.41.2.4
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Request a course
 #
-# $Id: lonrequestcourse.pm,v 1.41.2.2 2009/12/20 01:58:48 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.41.2.4 2010/02/04 21:01:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3156,7 +3156,14 @@ sub update_requestors_roles {
                 @roles = ($ccrole);
             }
             foreach my $role (@roles) {
-                my $start = $now;
+                my $refresh=$env{'user.refresh.time'};
+                if ($refresh eq '') {
+                    $refresh = $env{'user.login.time'};
+                }
+                if ($refresh eq '') {
+                    $refresh = $now;
+                }
+                my $start = $refresh-1;
                 my $end = '0';
                 if ($role eq 'st') {
                     if ($details->{'accessstart'} ne '') {
@@ -3311,7 +3318,7 @@ sub store_crsparms {
                                        type  => 'date_end',
                                      },
                       problemstatus => {
-                                           value => 'no_feedback_ever',
+                                           value => 'no',
                                            type  => 'string_problemstatus',
                                        },
                       maxtries      => {