Configurable feedback email links show problem grader.

conf/defaults.config

@@ -81,6 +81,11 @@ $mail{feedbackSubjectFormat} = "[WWfeedback] course:%c user:%u set:%s prob:%p se
 #  2: as in 1, plus the problem environment (debugging data)
 $mail{feedbackVerbosity}     = 1;
 
+# If this is 1, then the links included in feedback emails when feedback is sent
+# from a problem will open the problem grader when followed. If this is 0, then
+# the problem grader will not be open when those links are followed.
+$mail{linksOpenProblemGrader} = 1;
+
 # Should the studentID be included in the feedback email when feedbackVerbosity > 0:
 # The default is yes
 $blockStudentIDinFeedback = 0;

conf/localOverrides.conf.dist

@@ -61,6 +61,11 @@ $mail{feedbackRecipients}    = [
 	#'prof2@yourserver.yourdomain.edu',
 ];
 
+# If this is 1, then the links included in feedback emails when feedback is sent
+# from a problem will open the problem grader when followed. If this is 0, then
+# the problem grader will not be open when those links are followed.
+#$mail{linksOpenProblemGrader} = 0;
+
 # Should the studentID be included in the feedback email when feedbackVerbosity > 0:
 # The default is yes. Uncomment the line below to block it from being included.
 # Blocking it from being included is recommended if the studentID is "personal"

lib/WeBWorK/ConfigValues.pm

@@ -886,6 +886,17 @@ sub getConfigValues ($ce) {
 				),
 				type => 'boolean'
 			},
+			{
+				var  => 'mail{linksOpenProblemGrader}',
+				doc  => x('Feedback links open problem grader'),
+				doc2 => x(
+					'If this is true, then the links included in feedback emails sent from a problem will have the '
+						. 'problem grader open when followed. If this is false, then the problem grader will not '
+						. 'be open when those links are followed. The problem grader may still be opened in any '
+						. 'case by using the "Show Problem Grader" button.'
+				),
+				type => 'boolean'
+			},
 		],
 	];
 

lib/WeBWorK/Utils.pm

@@ -356,7 +356,7 @@ sub generateURLs ($c, %params) {
 				for my $name ('displayMode', 'showCorrectAnswers', 'showHints', 'showOldAnswers', 'showSolutions') {
 					$args{$name} = [ $c->param($name) ] if defined $c->param($name) && $c->param($name) ne '';
 				}
-				$args{showProblemGrader} = 1;
+				$args{showProblemGrader} = 1 if $c->ce->{mail}{linksOpenProblemGrader};
 			} else {
 				$routePath = $c->url_for('problem_list', setID => $params{set_id});
 			}