--- loncom/metadata_database/LONCAPA/lonmetadata.pm	2007/08/18 00:32:05	1.24
+++ loncom/metadata_database/LONCAPA/lonmetadata.pm	2009/04/29 15:21:00	1.27
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonmetadata.pm,v 1.24 2007/08/18 00:32:05 albertel Exp $
+# $Id: lonmetadata.pm,v 1.27 2009/04/29 15:21:00 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -935,16 +935,20 @@ sub process_dynamic_metadata {
     }
     #
     # put together comments
-    my $comments = '<div class="LCevalcomments">';
+    my $comments = '';
     foreach my $evaluator (keys(%{$resdata->{'evaluation'}->{'comments'}})){
         $comments .= 
             '<p>'.
-            '<b>'.$evaluator.'</b>:'.
+            '<b>'.$evaluator.'</b>: '.
             $resdata->{'evaluation'}->{'comments'}->{$evaluator}.
             '</p>';
     }
-    $comments .= '</div>';
-    $data{'comments'} = $comments;
+    if ($comments) {
+        $comments = '<div class="LCevalcomments">'
+                   .$comments
+                   .'</div>';
+        $data{'comments'} = $comments;
+    }
     #
     if (exists($resdata->{'stats'})) {
         $data{'stats'} = $resdata->{'stats'};
@@ -1183,8 +1187,8 @@ sub process_allusers_data {
         if ($udom eq '' || $uname eq '' ) {
             $error = 'No domain and/or username specified';
         } else {
-            $delitem = 'domain = '.$dbh->quote($udom).' AND username = '.
-                       $dbh->quote($uname);
+            $delitem = 'domain = '.$dbh->quote($udom).' AND username '.
+                       'COLLATE latin1_general_cs = '.$dbh->quote($uname);
             $error=&delete_metadata($dbh,$newnames->{'allusers'},$delitem);
         }
         if (defined($error)) {