--- loncom/interface/lonrequestcourse.pm	2010/01/02 18:11:46	1.41.2.3
+++ loncom/interface/lonrequestcourse.pm	2010/02/25 05:01:25	1.41.2.5
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Request a course
 #
-# $Id: lonrequestcourse.pm,v 1.41.2.3 2010/01/02 18:11:46 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.41.2.5 2010/02/25 05:01:25 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3003,6 +3003,10 @@ sub print_request_outcome {
                     my %parmresult =
                         &store_crsparms($dom,$cnum,$now,$accessstart,$accessend);
                     &Apache::londocsgci::setdefaults();
+                    my %crsenvhash = (
+                                       suppress_tries => 'yes',
+                                     );
+                    my $putresult =  &Apache::lonnet::put('environment',\%crsenvhash,$dom,$cnum);
                     if ($env{'form.concepttest'} eq 'defchosen') {
                         $output .= '<br />';
                         my $error = &Apache::londocsgci::store($caller,$dom,$cnum);
@@ -3318,7 +3322,7 @@ sub store_crsparms {
                                        type  => 'date_end',
                                      },
                       problemstatus => {
-                                           value => 'no_feedback_ever',
+                                           value => 'no',
                                            type  => 'string_problemstatus',
                                        },
                       maxtries      => {