[LON-CAPA-cvs] cvs: loncom /interface lonfeedback.pm

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 15 Nov 2004 23:02:46 -0000


albertel		Mon Nov 15 18:02:46 2004 EDT

  Modified files:              
    /loncom/interface	lonfeedback.pm 
  Log:
  - off is 0 and on is 1, what a novel concept. :-)
  
  
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.137 loncom/interface/lonfeedback.pm:1.138
--- loncom/interface/lonfeedback.pm:1.137	Mon Nov 15 17:48:51 2004
+++ loncom/interface/lonfeedback.pm	Mon Nov 15 18:02:45 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.137 2004/11/15 22:48:51 albertel Exp $
+# $Id: lonfeedback.pm,v 1.138 2004/11/15 23:02:45 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -132,7 +132,6 @@
             $prevread = $dischash{$lastkey};
         }
     }
-	  &Apache::lonnet::logthis("\n last read r symb ".$lastkey);
 
 # Get information about students and non-students in course for filtering display of posts
     my %roleshash = ();
@@ -2901,8 +2900,8 @@
       my ($symb,$feedurl)=&get_feedurl_and_clean_symb($ENV{'form.symb'});
       my %discinfo;
 # ------------------------ Modify setting for read/unread toggle for each post 
-      if ($ENV{'form.toggoff'}) { $discinfo{$symb.'_readtoggle'}=1; }
-      if ($ENV{'form.toggon'})  { $discinfo{$symb.'_readtoggle'}=0;  }
+      if ($ENV{'form.toggoff'}) { $discinfo{$symb.'_readtoggle'}=0; }
+      if ($ENV{'form.toggon'})  { $discinfo{$symb.'_readtoggle'}=1; }
 # --------- Modify setting for identification of 'NEW' posts in this discussion
       if ($ENV{'form.markondisp'}) {
 	  $discinfo{$symb.'_lastread'} = time;