--- loncom/interface/lonfeedback.pm	2003/09/15 13:38:19	1.55
+++ loncom/interface/lonfeedback.pm	2003/09/15 21:50:49	1.58
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.55 2003/09/15 13:38:19 www Exp $
+# $Id: lonfeedback.pm,v 1.58 2003/09/15 21:50:49 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -53,7 +53,9 @@ use Apache::loncommon();
 use Apache::lontexconvert();
 
 sub list_discussion {
-    my ($discussiononly,$symb)=@_;
+    my ($mode,$status,$symb)=@_;
+    my $discussiononly=0;
+    if ($mode eq 'board') { $discussiononly=1; }
     unless ($ENV{'request.course.id'}) { return ''; }
     my $crs='/'.$ENV{'request.course.id'};
     if ($ENV{'request.course.sec'}) {
@@ -735,7 +737,7 @@ sub handler {
    }
   } else {
 # Ambiguous Problem Resource
-      if ( Apache::exists_config_define("MODPERL2") ) {
+      if ( $Apache::lonnet::perlvar{'MODPERL2'} ) {
 	  &Apache::lonnet::cleanenv();
       }
       $r->internal_redirect('/adm/ambiguous');