--- loncom/interface/lonfeedback.pm	2004/11/15 21:35:37	1.133
+++ loncom/interface/lonfeedback.pm	2004/11/15 21:51:19	1.134
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.133 2004/11/15 21:35:37 albertel Exp $
+# $Id: lonfeedback.pm,v 1.134 2004/11/15 21:51:19 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -355,8 +355,7 @@ imscp_v1p1.xsd http://www.imsglobal.org/
    }
 </script>
             |;
-	    #FIXME need a <form back here for indiviaual red toggling
-	    $discussion.='<form><table bgcolor="#AAAAAA" cellpadding="2" cellspacing="2" border="0">';
+	    $discussion.='<form name="readchoices" method="post" action="/adm/feedback?chgreads='.$ressymb.'" ><table bgcolor="#AAAAAA" cellpadding="2" cellspacing="2" border="0">';
 	    $discussion .='<tr><td bgcolor="#DDDDBB" colspan="'.$colspan.'">'.
 		'<table border="0" width="100%" bgcolor="#DDDDBB"><tr>';
 	    if ($visible>2) {
@@ -562,8 +561,7 @@ END
              </td>
             </tr>
            </table>
-           <br /><br />
-	   </form>
+           <br /><br /></form>
 END
         } 
         if ($outputtarget eq 'export') {
@@ -3081,6 +3079,12 @@ ENDREDIR
       }
       &modify_attachments($r,\@currnewattach,\@currdelold,$symb,$idx,
 			  $attachmenturls);
+  } elsif ($ENV{'form.chgreads'}) {
+      &Apache::loncommon::content_type($r,'text/html');
+      $r->send_http_header;
+      my ($map,$ind,$url)=&Apache::lonnet::decode_symb($ENV{'form.chgreads'});
+      &redirect_back($r,&Apache::lonnet::clutter($url),
+		     &mt('Changed read status').'<br />','0','0');
   } elsif ($ENV{'form.export'}) {
       &Apache::loncommon::content_type($r,'text/html');
       $r->send_http_header;
@@ -3096,7 +3100,6 @@ ENDREDIR
       my $bodytag=&Apache::loncommon::bodytag('Resource Feedback and Discussion');
       $r->print($bodytag.$discussion);                                     
       return OK;
-      #FIXME deleted CHGREADS needs to be readded
   } else {
 # ------------------------------------------------------------- Normal feedback
       my $feedurl=$ENV{'form.postdata'};