Log Message:
-----------
CourseID is now part of the subject line when feedback is sent.
This allows you to filter out feedback by course, which is handy
for those of use receiving lots of feedback emails.
Modified Files:
--------------
webwork-modperl/lib/WeBWorK/ContentGenerator:
Feedback.pm
Revision Data
-------------
Index: Feedback.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/Feedback.pm,v
retrieving revision 1.24
retrieving revision 1.25
diff -Llib/WeBWorK/ContentGenerator/Feedback.pm -Llib/WeBWorK/ContentGenerator/Feedback.pm -u -r1.24 -r1.25
--- 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" : ""
),
|
