--- loncom/interface/lonfeedback.pm	2003/09/14 23:57:18	1.54
+++ loncom/interface/lonfeedback.pm	2003/09/15 13:38:19	1.55
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.54 2003/09/14 23:57:18 www Exp $
+# $Id: lonfeedback.pm,v 1.55 2003/09/15 13:38:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -53,7 +53,13 @@ use Apache::loncommon();
 use Apache::lontexconvert();
 
 sub list_discussion {
-    my ($crs,$symb,$discussiononly)=@_;
+    my ($discussiononly,$symb)=@_;
+    unless ($ENV{'request.course.id'}) { return ''; }
+    my $crs='/'.$ENV{'request.course.id'};
+    if ($ENV{'request.course.sec'}) {
+	$crs.='_'.$ENV{'request.course.sec'};
+    }                 
+    $crs=~s/\_/\//g;
     unless ($symb) {
 	$symb=&Apache::lonnet::symbread();
     }