[WWcvs] pg: Make sure $attempts is properly defined

[Mike G. v. a. <we...@ma...>]

Log Message:
-----------
Make sure $attempts is properly defined

Modified Files:
--------------
    pg/macros:
        PGbasicmacros.pl

Revision Data
-------------
Index: PGbasicmacros.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/PGbasicmacros.pl,v
retrieving revision 1.55
retrieving revision 1.56
diff -Lmacros/PGbasicmacros.pl -Lmacros/PGbasicmacros.pl -u -r1.55 -r1.56
--- macros/PGbasicmacros.pl
+++ macros/PGbasicmacros.pl
@@ -1003,7 +1003,8 @@
     my $showHint = PG_restricted_eval(q!$main::showHint!);
     my $displayHint = PG_restricted_eval(q!$envir->{'displayHintsQ'}!);
 	PG_restricted_eval(q!$main::hintExists =1!);
-    my $attempts = PG_restricted_eval(q!$main::numOfAttempts = 0 unless defined($main::numOfAttempts);!);
+    PG_restricted_eval(q!$main::numOfAttempts = 0 unless defined($main::numOfAttempts);!);
+    my $attempts = PG_restricted_eval(q!$main::numOfAttempts!);
 
 	if ($displayMode eq 'TeX')   {
 	    if ($printHintForInstructor) {