--- loncom/interface/lonfeedback.pm	2003/11/27 09:20:39	1.72
+++ loncom/interface/lonfeedback.pm	2003/11/27 09:43:42	1.73
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.72 2003/11/27 09:20:39 albertel Exp $
+# $Id: lonfeedback.pm,v 1.73 2003/11/27 09:43:42 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -70,7 +70,12 @@ sub list_discussion {
     my $seeid=&Apache::lonnet::allowed('rin',$crs);
     my $viewgrades=&Apache::lonnet::allowed('vgr',$crs);
     my @discussionitems=();
-    my %contrib=&Apache::lonnet::restore($symb,$ENV{'request.course.id'},
+    # backward compatability (bulltein boards used to be 'wrapped')
+    my $ressymb=$symb;
+    if ($mode eq 'board') {
+	$ressymb=~s|(bulletin___\d+___)|$1adm/wrapper|;
+    }
+    my %contrib=&Apache::lonnet::restore($ressymb,$ENV{'request.course.id'},
 			  $ENV{'course.'.$ENV{'request.course.id'}.'.domain'},
 			  $ENV{'course.'.$ENV{'request.course.id'}.'.num'});
     my $visible=0;
@@ -215,7 +220,7 @@ sub list_discussion {
 <form action="/adm/feedback" method="post" name="mailform" enctype="multipart/form-data">
 <input type="submit" name="discuss" value="Post Discussion" />
 <input type="submit" name="anondiscuss" value="Post Anonymous Discussion" />
-<input type="hidden" name="symb" value="$symb" />
+<input type="hidden" name="symb" value="$ressymb" />
 <input type="hidden" name="sendit" value="true" />
 <br />
 <font size="1">Note: in anonymous discussion, your name is visible only to
@@ -765,7 +770,10 @@ sub handler {
   if ($feedurl=~/\.(problem|exam|quiz|assess|survey|form)$/) {
       unless ($symb) { $goahead=0; }
   }
-
+  # backward compatability (bulltein boards used to be 'wrapped')
+  if ($feedurl=~m|^/adm/wrapper/adm/.*/bulletinboard$|) {
+      $feedurl=~s|^/adm/wrapper||;
+  }
   if ($goahead) {
 # Go ahead with feedback, no ambiguous reference
     &Apache::loncommon::content_type($r,'text/html');