[LON-CAPA-cvs] cvs: loncom(GCI_2) /interface lonrequestcourse.pm

[gci]

gci		Wed Sep 23 15:58:26 2009 EDT

  Modified files:              (Branch: GCI_2)
    /loncom/interface	lonrequestcourse.pm 
  Log:
  - Customiation for GCI
  - 'unofficial' courses only
  - logging unavailable
  - course domain fixed as gcitest 
  
  
Index: loncom/interface/lonrequestcourse.pm
diff -u loncom/interface/lonrequestcourse.pm:1.36 loncom/interface/lonrequestcourse.pm:1.36.2.1
--- loncom/interface/lonrequestcourse.pm:1.36	Sun Sep 13 03:13:55 2009
+++ loncom/interface/lonrequestcourse.pm	Wed Sep 23 15:58:26 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Request a course
 #
-# $Id: lonrequestcourse.pm,v 1.36 2009/09/13 03:13:55 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.36.2.1 2009/09/23 15:58:26 gci Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -238,8 +238,8 @@
                                     foreach my $item (@code_order) {
                                         $crosslistcode .= $env{'form.crosslist_'.$i.'_'.$item}; 
                                     }
-                                    if ($crosslistcode ne '') { 
-                                         ($codechk{$i}, my $rest) = 
+                                    if ($crosslistcode ne '') {
+                                        ($codechk{$i}, my $rest) =
                                             &Apache::lonnet::auto_validate_instcode('',$dom,$crosslistcode);
                                     }
                                     unless ($codechk{$i} eq 'valid') {
@@ -627,7 +627,7 @@
 }
 
 sub course_types {
-    my @types = ('official','unofficial','community');
+    my @types = ('unofficial'); 
     my %typename = (
                          official   => 'Official course',
                          unofficial => 'Unofficial course',
@@ -730,12 +730,9 @@
              '<div>'.
               &Apache::lonhtmlcommon::start_pick_box().
               &Apache::lonhtmlcommon::row_title(&mt('Course Domain')).
-              '<form name="domforcourse" method="post" action="/adm/requestcourse">'.
-              &Apache::loncommon::select_dom_form($dom,'showdom','',1,$onchange));
-    if (!$onchange) {
-        $r->print('&nbsp;<input type="submit" name="godom" value="'.
-                   &mt('Change').'" />');
-    }
+              '<form name="domforcourse" method="post" action="/adm/requestcourse">');
+    $r->print('GCI Web Center Concept Test Delivery (gcitest)'."\n".
+              '<input type="hidden" value="gcitest" name="showdom" />');
     $r->print('</form>'.&Apache::lonhtmlcommon::row_closure());
 
     my $formname = 'requestcrs';
@@ -745,24 +742,12 @@
 <select size="1" name="action" >
  <option value="new">'.&mt('New request').'</option>
  <option value="view">'.&mt('View/Modify/Cancel pending requests').'</option>
- <option value="log">'.&mt('View request history').'</option>
 </select></form>'.
               &Apache::lonhtmlcommon::row_closure(1).
-              &Apache::lonhtmlcommon::row_title(&mt('Course Type')).'
-<form name="mainmenu_coursetype" method="post" action="">
-<select size="1" name="crstype">
- <option value="any">'.&mt('All types').'</option>');
-    if ((ref($types) eq 'ARRAY') && (ref($typename) eq 'HASH')) {
-        foreach my $type (@{$types}) {
-            my $selected = '';
-            if ($type eq 'official') {
-                $selected = ' selected="selected"';
-            }
-            $r->print('<option value="'.$type.'"'.$selected.'>'.&mt($typename->{$type}).
-                      '</option>'."\n");
-        }
-    }
-    $r->print('</select></form>'."\n".
+              &Apache::lonhtmlcommon::row_title(&mt('Course Type')).
+              &mt($typename->{'unofficial'})."\n".
+              '<form name="mainmenu_coursetype" method="post" action="">'."\n".
+              '<input type="hidden" name="crstype" value="unofficial" ></form>'."\n".
               &Apache::lonhtmlcommon::row_closure(1)."\n".
               &Apache::lonhtmlcommon::end_pick_box().'</div>'."\n".
               '<div><form name="'.$formname.'" method="post" action="">'."\n".