--- loncom/homework/grades.pm	2007/08/10 20:09:30	1.426
+++ loncom/homework/grades.pm	2007/08/21 18:41:27	1.430
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.426 2007/08/10 20:09:30 albertel Exp $
+# $Id: grades.pm,v 1.430 2007/08/21 18:41:27 banghart Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1950,10 +1950,12 @@ KEYWORDS
 								   {'one_time' => 1});
 
 			    $similar="<hr /><h3><span class=\"LC_warning\">".
-				&mt('Essay is [_1]% similar to an essay by [_2] in course [_3]:[_4]',
+				&mt('Essay is [_1]% similar to an essay by [_2] ([_3]:[_4]) in course [_5] (course id [_6]:[_7])',
 				    $osim,
 				    &Apache::loncommon::plainname($oname,$odom),
+				    $oname,$odom,
 				    $old_course_desc{'description'},
+				    $old_course_desc{'num'},
 				    $old_course_desc{'domain'}).
 				'</span></h3><blockquote><i>'.
 				&keywords_highlight($oessay).
@@ -2969,12 +2971,13 @@ sub viewgrades {
 	'<input type="hidden" name="probTitle" value="'.$env{'form.probTitle'}.'" />'."\n";
 
     my $sectionClass;
+    my $section_display = join (", ",&Apache::loncommon::get_env_multiple('form.section'));
     if ($env{'form.section'} eq 'all') {
 	$sectionClass='Class </h3>';
     } elsif ($env{'form.section'} eq 'none') {
 	$sectionClass='Students in no Section </h3>';
     } else {
-	$sectionClass='Students in Section '.$env{'form.section'}.'</h3>';
+	$sectionClass='Students in Section(s) '.$section_display.'</h3>';
     }
     $result.='<h3>Assign Common Grade To '.$sectionClass;
     $result.= '<table border=0><tr><td bgcolor="#777777">'."\n".
@@ -6930,7 +6933,7 @@ GRADINGMENUJS
 
     $result.='<table width="100%" border="0">';
     $result.='<tr bgcolor="#ffffe6" valign="top"><td>'."\n".
-	'&nbsp;'.&mt('Select Section').': <select name="section">'."\n";
+	'&nbsp;'.&mt('Select Section').': <select name="section" multiple="multiple" size="3">'."\n";
     if (ref($sections)) {
 	foreach (sort (@$sections)) {
 	    $result.='<option value="'.$_.'" '.
@@ -7322,6 +7325,9 @@ ENDHEADER
           $result.='<br /><span class="LC_warning">'.&mt("Found [_1] entries for grading!",$correct_count).'</span>';
        }
     }
+    if ($number<1) {
+       $errormsg.="Found no questions.";
+    }
     if ($errormsg) {
        $result.='<br /><span class="LC_error">'.&mt($errormsg).'</span>';
     } else {
@@ -7539,6 +7545,10 @@ sub handler {
 	}
     } else {
 	&init_perm();
+#	&Apache::lonnet::logthis("command is $command");
+#	foreach my $key (keys %perm) {
+#	    &Apache::lonnet::logthis("a key is $key");
+#	}
 	if ($command eq 'submission' && $perm{'vgr'}) {
 	    ($env{'form.student'} eq '' ? &listStudents($request) : &submission($request,0,0));
 	} elsif ($command eq 'pickStudentPage' && $perm{'vgr'}) {