Log Message:
-----------
Changed the message on the email message a bit.
Modified Files:
--------------
webwork2/lib/WeBWorK/ContentGenerator:
CourseAdmin.pm
Revision Data
-------------
Index: CourseAdmin.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator/CourseAdmin.pm,v
retrieving revision 1.71
retrieving revision 1.72
diff -Llib/WeBWorK/ContentGenerator/CourseAdmin.pm -Llib/WeBWorK/ContentGenerator/CourseAdmin.pm -u -r1.71 -r1.72
--- lib/WeBWorK/ContentGenerator/CourseAdmin.pm
+++ lib/WeBWorK/ContentGenerator/CourseAdmin.pm
@@ -2454,13 +2454,22 @@
}
sub registration_form {
my $self = shift;
+my $ce = $self->r->ce;
+
print "<center>";
print "\n",CGI::p({style=>"text-align: left; width:60%"},
"\nPlease ",
CGI::a({href=>'mailto:ga...@ma...?'
.'subject=WeBWorK%20Server%20Registration'
.'&body='
-.uri_escape("Server URL: \n\n")
+.uri_escape("Thanks for registering your WeBWorK server. We'd appreciate if you would answer
+as many of these questions as you can conveniently. We need this data so we can better
+answer questions such as 'How many institutions have webwork servers?' and 'How many students
+use WeBWorK?'. Your email and contact information will be kept private. We will
+list your institution as one that uses WeBWorK unless you tell us to keep that private as well.
+\n\nThank you. \n\n--Mike Gage \n\n
+")
+.uri_escape("Server URL: ".$ce->{apache_root_url}." \n\n")
.uri_escape("WeBWorK version: $main::VERSION \n\n")
.uri_escape("Institution name (e.g. University of Rochester): \n\n")
.uri_escape("Contact person name: \n\n")
|