Log Message:
-----------
remove attempt to set formatting with $#
causes bad warnings in perl 5.10.x
forward port from rel-2-4-patches
Modified Files:
--------------
pg/macros:
PG.pl
Revision Data
-------------
Index: PG.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/PG.pl,v
retrieving revision 1.38
retrieving revision 1.39
diff -Lmacros/PG.pl -Lmacros/PG.pl -u -r1.38 -r1.39
--- macros/PG.pl
+++ macros/PG.pl
@@ -202,7 +202,7 @@
# %main::gifs_created = ();
eval(q!
# set perl to use capital E for scientific notation: e.g. 5.4E-05 instead of 5.4e-05
- $#="%G"; #FIXME -- check that this works
+ # $#="%G"; #FIXME -- this causes bad warnings in perl 5.10
@main::PG_ANSWER_ENTRY_ORDER = ();
$main::ANSWER_PREFIX = 'AnSwEr';
|