--- loncom/interface/lonfeedback.pm	2004/11/12 16:22:48	1.131
+++ loncom/interface/lonfeedback.pm	2004/11/14 07:54:41	1.132
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.131 2004/11/12 16:22:48 www Exp $
+# $Id: lonfeedback.pm,v 1.132 2004/11/14 07:54:41 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2340,6 +2340,7 @@ sub adddiscuss {
             $contrib{'history'} = '';
             my $numoldver = 0;
             my ($oldsymb,$oldidx)=split(/\:\:\:/,$ENV{'form.editdisc'});
+	    &Apache::lonenc::check_decrypt(\$oldsymb);
             $oldsymb=~s|(bulletin___\d+___)adm/wrapper/|$1|;
 # get timestamp for last post and history
             my %oldcontrib=&Apache::lonnet::restore($oldsymb,$ENV{'request.course.id'},
@@ -2800,6 +2801,7 @@ END
       my $seeid=&Apache::lonnet::allowed('rin',$crs);
       my ($symb,$idx)=split(/\:\:\:/,$ENV{'form.allversions'});
       my $ressymb=$symb;
+      &Apache::lonenc::check_decrypt(\$ressymb);
       unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
           $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
       }
@@ -2841,6 +2843,7 @@ END
       my $previous=$ENV{'form.previous'};
 # backward compatibility (bulletin boards used to be 'wrapped')
       my $ressymb=$symb;
+      &Apache::lonenc::check_decrypt(\$ressymb);
       unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
           $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
       }
@@ -2920,6 +2923,7 @@ END
       foreach (@resources) {
 # backward compatibility (bulletin boards used to be 'wrapped')
           my $ressymb=$_;
+	  &Apache::lonenc::check_decrypt(\$ressymb);
           if ($ressymb =~ m/bulletin___\d+___/) {
               unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
                   $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper/|;
@@ -2977,6 +2981,7 @@ ENDREDIR
           my $symb=$ENV{'form.toggoff'}?$ENV{'form.toggoff'}:$ENV{'form.toggon'};
           my $ressymb = $symb;
           ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);
+	  &Apache::lonenc::check_decrypt(\$ressymb);
           unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
               $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
           }
@@ -2994,6 +2999,7 @@ ENDREDIR
           my $symb=$ENV{'form.markondisp'}?$ENV{'form.markondisp'}:$ENV{'form.markonread'};
           my $ressymb = $symb;
           ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);
+	  &Apache::lonenc::check_decrypt(\$ressymb);
           unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
               $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
           }
@@ -3023,6 +3029,7 @@ ENDREDIR
           }
           my $ressymb = $symb;
           ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);
+	  &Apache::lonenc::check_decrypt(\$ressymb);
           unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
               $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
           }
@@ -3050,6 +3057,7 @@ ENDREDIR
       my $symb=$ENV{'form.markread'};
       my $ressymb = $symb;
       my ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);
+      &Apache::lonenc::check_decrypt(\$ressymb);
       unless ($ressymb =~ m|bulletin___\d+___adm/wrapper|) {
           $ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
       }
@@ -3232,6 +3240,7 @@ ENDREDIR
           $feedurl=&Apache::lonnet::clutter($url);
       }
   }
+  &Apache::lonenc::check_decrypt(\$symb);
   my $goahead=1;
   if ($feedurl=~/\.(problem|exam|quiz|assess|survey|form)$/) {
       unless ($symb) { $goahead=0; }
@@ -3289,6 +3298,7 @@ ENDREDIR
           } elsif ($ENV{'form.origpage'}) {
               $symb = $ENV{'form.symb'};
           }
+	  &Apache::lonenc::check_decrypt(\$symb);
           my @currnewattach = ();
           my @deloldattach = ();
           my @keepold = ();