--- loncom/interface/lonfeedback.pm	2010/11/20 01:07:05	1.304
+++ loncom/interface/lonfeedback.pm	2011/11/07 20:05:55	1.305
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.304 2010/11/20 01:07:05 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.305 2011/11/07 20:05:55 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -135,7 +135,7 @@ sub list_discussion {
     $crs=~s/\_/\//g;
     my $encsymb=&Apache::lonenc::check_encrypt($ressymb);
     my $viewgrades=(&Apache::lonnet::allowed('vgr',$crs)
-		  && ($ressymb=~/\.(problem|exam|quiz|assess|survey|form|task)$/));
+		  && ($ressymb=~/$LONCAPA::assess_re/));
     
     my %usernamesort = ();
     my %namesort =();
@@ -3814,7 +3814,7 @@ ENDREDIR
       my $mode='board';
       my $status='OPEN';
       my $previous=$env{'form.previous'};
-      if ($feedurl =~ /\.(problem|exam|quiz|assess|survey|form|library|task)$/) {
+      if ($feedurl =~ /$LONCAPA::assess_re/) {
           $mode='problem';
           $status=$Apache::inputtags::status[-1];
       }
@@ -3854,7 +3854,7 @@ ENDREDIR
           &dewrapper(\$feedurl);
       }
       my $goahead=1;
-      if ($feedurl=~/\.(problem|exam|quiz|assess|survey|form|task)$/) {
+      if ($feedurl=~/$LONCAPA::assess_re/) {
 	  unless ($symb) { $goahead=0; }
       }
       if (!$goahead) {