From: Sam H. v. a. <we...@ma...> - 2005-11-28 20:52:31
|
Log Message: ----------- reinstated "report bugs" item in links() Modified Files: -------------- webwork2/lib/WeBWorK: ContentGenerator.pm Revision Data ------------- Index: ContentGenerator.pm =================================================================== RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator.pm,v retrieving revision 1.154 retrieving revision 1.155 diff -Llib/WeBWorK/ContentGenerator.pm -Llib/WeBWorK/ContentGenerator.pm -u -r1.154 -r1.155 --- lib/WeBWorK/ContentGenerator.pm +++ lib/WeBWorK/ContentGenerator.pm @@ -487,10 +487,6 @@ =cut -# http://devel.webwork.rochester.edu:8000/webwork2/sam_2005-08-04_renamed1/fun_set -# /2/?user=sam&effectiveUser=sam&key=c0rr63Ki5r9HZh1J9pGG1loi.Hm4D!1caiFTjh*2& -# displayMode=images&showOldAnswers=1 - sub links { my ($self) = @_; my $r = $self->r; @@ -594,6 +590,13 @@ my %systemlink_args; $systemlink_args{params} = \%params if %params; + if (exists $ce->{webworkURLs}{bugReporter} and $ce->{webworkURLs}{bugReporter} ne "" + and $authz->hasPermissions($userID, "report_bugs")) { + print CGI::start_ul(); + print CGI::li(CGI::a({style=>"font-size:larger", href=>$ce->{webworkURLs}{bugReporter}}, "Report bugs")); + print CGI::end_ul(); + } + #print CGI::start_ul(); #print CGI::start_li(); # Courses #print &$makelink("${pfx}Home", text=>"Courses", systemlink_args=>{authen=>0}); |