Log Message:
-----------
Update information to instructor about hints in the problem.
Modified Files:
--------------
pg/macros:
PGbasicmacros.pl
Revision Data
-------------
Index: PGbasicmacros.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/PGbasicmacros.pl,v
retrieving revision 1.58
retrieving revision 1.59
diff -Lmacros/PGbasicmacros.pl -Lmacros/PGbasicmacros.pl -u -r1.58 -r1.59
--- macros/PGbasicmacros.pl
+++ macros/PGbasicmacros.pl
@@ -1002,7 +1002,7 @@
PG_restricted_eval(q!$main::envir{'PRINT_FILE_NAMES_PERMISSION_LEVEL'}!) : 10000; # protect against undefined values
my $printHintForInstructor = $permissionLevel >= $PRINT_FILE_NAMES_PERMISSION_LEVEL;
my $showHint = PG_restricted_eval(q!$main::showHint!);
- my $displayHint = PG_restricted_eval(q!$envir{'displayHintsQ'}!);
+ my $displayHint = PG_restricted_eval(q!$main::envir{'displayHintsQ'}!);
PG_restricted_eval(q!$main::hintExists =1!);
PG_restricted_eval(q!$main::numOfAttempts = 0 unless defined($main::numOfAttempts);!);
my $attempts = PG_restricted_eval(q!$main::numOfAttempts!);
@@ -1014,7 +1014,7 @@
$out = ''; # do nothing since hints are not available for download for students
}
} elsif ($printHintForInstructor) { # always print hints for instructor types
- $out = join(' ', "$BR( Show the student hint after $showHint attempts: )$BR $BBOLD HINT: $EBOLD ", @in);
+ $out = join(' ', "$BR( Show the student hint after $showHint attempts. The current number of attempts is $attempts. )$BR $BBOLD HINT: $EBOLD ", @in);
} elsif ( $displayHint and ( $attempts > $showHint )) {
## the second test above prevents a hint being shown if a doctored form is submitted
|
