--- loncom/interface/lonrequestcourse.pm	2010/02/04 21:01:30	1.41.2.4
+++ 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.4 2010/02/04 21:01:30 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);