[WWcvs] webwork2: HEAD backport: CourseID is now part of the subject line when

[Sam H. v. a. <we...@ma...>]

Log Message:
-----------
HEAD backport: CourseID is now part of the subject line when feedback is
sent (gage)

Tags:
----
rel-2-1-patches

Modified Files:
--------------
    webwork2/lib/WeBWorK/ContentGenerator:
        Feedback.pm

Revision Data
-------------
Index: Feedback.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator/Feedback.pm,v
retrieving revision 1.24
retrieving revision 1.24.2.1
diff -Llib/WeBWorK/ContentGenerator/Feedback.pm -Llib/WeBWorK/ContentGenerator/Feedback.pm -u -r1.24 -r1.24.2.1
--- lib/WeBWorK/ContentGenerator/Feedback.pm
+++ lib/WeBWorK/ContentGenerator/Feedback.pm
@@ -76,6 +76,8 @@
 	my $showSolutions      = $r->param("showSolutions");
 	my $from               = $r->param("from");
 	my $feedback           = $r->param("feedback");
+	my $courseID           = $r->urlpath->arg("courseID");
+	
 	
 	my ($user, $set, $problem);
 	$user = $db->getUser($userName) # checked
@@ -198,7 +200,7 @@
 			# *** we might want to have a CE setting for
 			# "additional recipients"
 			smtp    => $ce->{mail}->{smtpServer},
-			subject => "WeBWorK feedback: ".$user->first_name." ".$user->last_name. 
+			subject => "WeBWorK feedback from $courseID: ".$user->first_name." ".$user->last_name. 
 			                (   ( defined($setName) && defined($problemNumber) ) ?
 			                				 " set$setName/prob$problemNumber" : ""
 			                ),