--- loncom/interface/lonmenu.pm 2011/11/07 18:22:37 1.359 +++ loncom/interface/lonmenu.pm 2011/11/10 21:15:55 1.361 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.359 2011/11/07 18:22:37 raeburn Exp $ +# $Id: lonmenu.pm,v 1.361 2011/11/10 21:15:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -153,6 +153,7 @@ use Apache::lonhtmlcommon(); use Apache::loncommon(); use Apache::lonenc(); use Apache::lonlocal; +use Apache::lonmsg(); use LONCAPA qw(:DEFAULT :match); use HTML::Entities(); use Apache::lonwishlist(); @@ -410,7 +411,7 @@ sub innerregister { my $hwkadd=''; if ($env{'request.symb'} ne '' && - $env{'request.filename'}=~/\.(problem|exam|quiz|assess|survey|form|task)$/) { + $env{'request.filename'}=~/$LONCAPA::assess_re/) { if (&Apache::lonnet::allowed('mgr',$crs)) { $hwkadd.=&switch('','',7,2,'pgrd.png','Content Grades','grades[_4]', "gocmd('/adm/grades','gradingmenu')",