--- loncom/interface/slotrequest.pm	2012/06/09 15:41:26	1.113
+++ loncom/interface/slotrequest.pm	2014/09/12 15:22:58	1.121
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler for requesting to have slots added to a students record
 #
-# $Id: slotrequest.pm,v 1.113 2012/06/09 15:41:26 raeburn Exp $
+# $Id: slotrequest.pm,v 1.121 2014/09/12 15:22:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -339,12 +339,12 @@ sub store_slot_parm {
                        context => $env{'form.context'},
                     );
 
-    &Apache::lonnet::instructor_log('slotreservationslog',\%storehash,
-                                    '',$env{'user.name'},$env{'user.domain'},
-                                    $cnum,$cdom);
-    &Apache::lonnet::instructor_log($cdom.'_'.$cnum.'_slotlog',\%storehash,
-                                    1,$env{'user.name'},$env{'user.domain'},
-                                    $env{'user.name'},$env{'user.domain'});
+    &Apache::lonnet::write_log('course','slotreservationslog',\%storehash,
+                               '',$env{'user.name'},$env{'user.domain'},
+                               $cnum,$cdom);
+    &Apache::lonnet::write_log('course',$cdom.'_'.$cnum.'_slotlog',\%storehash,
+                               1,$env{'user.name'},$env{'user.domain'},
+                               $env{'user.name'},$env{'user.domain'});
 
     return;
 }
@@ -538,10 +538,10 @@ sub release_reservation {
                                action  => 'release',
                                context => $env{'form.context'},
                         );
-            &Apache::lonnet::instructor_log('slotreservationslog',\%storehash,
-                                            1,$uname,$udom,$cnum,$cdom);
-            &Apache::lonnet::instructor_log($cdom.'_'.$cnum.'_slotlog',\%storehash,
-                                            1,$uname,$udom,$uname,$udom);
+            &Apache::lonnet::write_log('slotreservationslog',\%storehash,
+                                       1,$uname,$udom,$cnum,$cdom);
+            &Apache::lonnet::write_log($cdom.'_'.$cnum.'_slotlog',\%storehash,
+                                       1,$uname,$udom,$uname,$udom);
 	}
     }
 
@@ -696,7 +696,7 @@ STUFF
     }
 
     my %lt = &Apache::lonlocal::texthash(
-        'request' => 'Availibility list',
+        'request' => 'Availability list',
         'try'     => 'Try again?',
         'or'      => 'or',
     );
@@ -847,13 +847,13 @@ sub show_choices {
     if (ref($consumed_uniqueperiods) eq 'HASH') {
         if (&Apache::lonnet::error(%$consumed_uniqueperiods)) {
             $r->print('<span class="LC_error">'.
-                      &mt('An error occurred determining slot availability').
+                      &mt('An error occurred determining slot availability.').
                       '</span>');
             return;
         }
     } elsif ($consumed_uniqueperiods =~ /^error: /) {
         $r->print('<span class="LC_error">'.
-                  &mt('An error occurred determining slot availability').
+                  &mt('An error occurred determining slot availability.').
                   '</span>');
         return;
     }
@@ -862,7 +862,7 @@ sub show_choices {
     my @got_slots=&check_for_reservation($symb,'allslots');
     if ($got_slots[0] =~ /^error: /) {
         $r->print('<span class="LC_error">'.
-                  &mt('An error occurred determining slot availability').
+                  &mt('An error occurred determining slot availability.').
                   '</span>');
         return;
     }
@@ -877,12 +877,12 @@ sub show_choices {
         push(@available,$slot);
     }
     if (!@available) {
-        $output = &mt('No available times.');
+        $output = '<span class="LC_info">'.&mt('No available times.').'</span>';
         if ($env{'form.command'} ne 'manageresv') {
             $output .= ' <a href="/adm/flip?postdata=return:">'.
                        &mt('Return to last resource').'</a>';
         }
-        $r->print('<p class="LC_info">'.$output.'</p>');
+        $r->print($output);
         return;
     }
     if ($env{'form.command'} eq 'manageresv') {
@@ -957,6 +957,7 @@ STUFF
        $output .= &Apache::loncommon::end_data_table();
     }
     $r->print($output);
+    return;
 }
 
 sub to_show {
@@ -1058,7 +1059,8 @@ sub show_table {
     my $available;
     if ($mgr eq 'F') {
     # FIXME: This line should be deleted once Slots uses breadcrumbs
-    $r->print(&Apache::loncommon::help_open_topic('Slot About', 'Help on slots'));
+    $r->print('<br />'.&Apache::loncommon::help_open_topic(
+        'Slot About', &mt('Help on slots')));
 
 	$r->print('<div>');
 	$r->print('<form method="post" action="/adm/slotrequest">
@@ -1074,11 +1076,11 @@ sub show_table {
     }
 
     if (!keys(%slots)) {
-        if ($crstype eq 'Community') {
-            $r->print('<div>'.&mt('No slots have been created in this community.').'</div>');
-        } else {
-            $r->print('<div>'.&mt('No slots have been created in this course.').'</div>');
-        }
+        $r->print(
+            '<p class="LC_info">'
+           .&mt('No slots have been created in this '.lc($crstype).'.')
+           .'</p>'
+        );
         return;
     }
     
@@ -1209,11 +1211,11 @@ sub show_table {
            <td valign="top">
             <table>
               <tr>
-                <td rowspan="2">Deleted slots:</td>
-                <td><label>'.$show_radio.'Show</label></td>
+                <td rowspan="2">'.&mt('Deleted slots:').'</td>
+                <td><label>'.$show_radio.&mt('Show').'</label></td>
               </tr>
               <tr>
-                <td><label>'.$hide_radio.'Hide</label></td>
+                <td><label>'.$hide_radio.&mt('Hide').'</label></td>
               </tr>
             </table>
 	  </td>
@@ -2048,7 +2050,7 @@ sub get_resource_title {
                 $maptitle = $maptitles->{$mapurl};
             } else {
                 if ($mapurl eq $env{'course.'.$env{'request.course.id'}.'.url'}) {
-                    $maptitle=&mt('Main Course Documents');
+                    $maptitle=&mt('Main Content');
                 } else {
                     $maptitle=&Apache::lonnet::gettitle($mapurl);
                 }
@@ -2199,7 +2201,7 @@ sub upload_start {
     my ($r)=@_;    
     $r->print(
         &Apache::grades::checkforfile_js()
-       .'<h3>'.&mt('Specify a file containing the slot definitions.').'</h3>'
+       .'<h2>'.&mt('Upload a file containing the slot definitions').'</h2>'
        .'<form method="post" enctype="multipart/form-data"'
        .' action="/adm/slotrequest" name="slotupload">'
        .'<input type="hidden" name="command" value="csvuploadmap" />'
@@ -2233,16 +2235,40 @@ sub csvuploadmap_header {
 
     my $checked=(($env{'form.noFirstLine'})?' checked="checked"':'');
     my $ignore=&mt('Ignore First Line');
-	my $help_field = &Apache::loncommon::help_open_topic('Slot SelectingField');
+    my $buttontext = &mt('Reverse Association');
+
+    $r->print(
+        '<form method="post" enctype="multipart/form-data" action="/adm/slotrequest" name="slotupload">'
+       .'<h2>'.&mt('Identify fields in uploaded list').'</h2>'
+       .'<div class="LC_columnSection">'
+       .&Apache::loncommon::help_open_topic(
+            'Slot About',&mt('Help on slots'))
+       .' '.&Apache::loncommon::help_open_topic(
+            'Slot SelectingField',&mt('Help on selecting Fields'))
+       ."</div>\n"
+       .'<p class="LC_info">'
+       .&mt('Total number of records found in file: [_1]','<b>'.$distotal.'</b>')
+       ."</p>\n"
+    );
+    if ($distotal == 0) {
+        $r->print('<p class="LC_warning">'.&mt('None found').'</p>');
+    }
+    $r->print(
+        '<p>'
+       .&mt('Enter as many fields as you can.').'<br />'
+       .&mt('The system will inform you and bring you back to this page,[_1]if the data selected is insufficient to create the slots.','<br />')
+       .'</p>'
+    );
+    $r->print(
+        '<div class="LC_left_float">'
+       .'<fieldset><legend>'.&mt('Functions').'</legend>'
+       .'<label><input type="checkbox" name="noFirstLine"'.$checked.' />'.$ignore.'</label>'
+       .' <input type="button" value="'.$buttontext
+           .'" onclick="javascript:this.form.associate.value=\'Reverse Association\';submit(this.form);" />'
+       .'</fieldset></div><br clear="all" />'
+    );
 
     $r->print(<<ENDPICK);
-<form method="post" enctype="multipart/form-data" action="/adm/slotrequest" name="slotupload">
-<h3>Identify fields $help_field</h3>	
-Total number of records found in file: $distotal <hr />
-Enter as many fields as you can. The system will inform you and bring you back
-to this page if the data selected is insufficient to create the slots.<hr />
-<input type="button" value="Reverse Association" onclick="javascript:this.form.associate.value='Reverse Association';submit(this.form);" />
-<label><input type="checkbox" name="noFirstLine"$checked />$ignore</label>
 <input type="hidden" name="associate"  value="" />
 <input type="hidden" name="datatoken"  value="$datatoken" />
 <input type="hidden" name="fileupload" value="$env{'form.fileupload'}" />
@@ -2250,9 +2276,10 @@ to this page if the data selected is ins
 <input type="hidden" name="upfile_associate" 
                                        value="$env{'form.upfile_associate'}" />
 <input type="hidden" name="command"    value="csvuploadassign" />
-<hr />
 <script type="text/javascript" language="Javascript">
+// <![CDATA[
 $javascript
+// ]]>
 </script>
 ENDPICK
     return '';
@@ -2263,7 +2290,6 @@ sub csvuploadmap_footer {
     my ($request,$i,$keyfields) =@_;
     my $buttontext = &mt('Create Slots');
     $request->print(<<ENDPICK);
-</table>
 <input type="hidden" name="nfields" value="$i" />
 <input type="hidden" name="keyfields" value="$keyfields" />
 <input type="button" onclick="javascript:verify(this.form)" value="$buttontext" /><br />
@@ -2272,7 +2298,7 @@ ENDPICK
 }
 
 sub csvupload_javascript_reverse_associate {
-    my $error1=&mt('You need to specify the name, starttime, endtime and a type');
+    my $error1=&mt('You need to specify the name, start time, end time and a type.');
     return(<<ENDPICK);
   function verify(vf) {
     var foundstart=0;
@@ -2298,7 +2324,7 @@ ENDPICK
 }
 
 sub csvupload_javascript_forward_associate {
-    my $error1=&mt('You need to specify the name, starttime, endtime and a type');
+    my $error1=&mt('You need to specify the name, start time, end time and a type.');
   return(<<ENDPICK);
   function verify(vf) {
     var foundstart=0;
@@ -2657,7 +2683,9 @@ sub handler {
 	    return OK;
 	}
 	if ($env{'form.requestattempt'}) {
+            $r->print('<div class="LC_left_float">'); 
 	    &show_choices($r,$symb);
+            $r->print('</div><div style="padding:0;clear:both;margin:0;border:0"></div>');
 	} elsif ($env{'form.command'} eq 'release') {
 	    &release_slot($r,$symb);
 	} elsif ($env{'form.command'} eq 'get') {