[system] / trunk / pg / macros / PG.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/PG.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 5568 Revision 5626
1################################################################################ 1################################################################################
2# WeBWorK Online Homework Delivery System 2# WeBWorK Online Homework Delivery System
3# Copyright 2000-2007 The WeBWorK Project, http://openwebwork.sf.net/ 3# Copyright 2000-2007 The WeBWorK Project, http://openwebwork.sf.net/
4# $CVSHeader: pg/macros/displayMacros.pl,v 1.9 2007/10/04 16:41:07 sh002i Exp $ 4# $CVSHeader: pg/macros/PG.pl,v 1.34 2007/10/25 17:11:59 sh002i Exp $
5# 5#
6# This program is free software; you can redistribute it and/or modify it under 6# This program is free software; you can redistribute it and/or modify it under
7# the terms of either: (a) the GNU General Public License as published by the 7# the terms of either: (a) the GNU General Public License as published by the
8# Free Software Foundation; either version 2, or (at your option) any later 8# Free Software Foundation; either version 2, or (at your option) any later
9# version, or (b) the "Artistic License" which comes with this package. 9# version, or (b) the "Artistic License" which comes with this package.
153 %PG_ANSWERS_HASH = (); 153 %PG_ANSWERS_HASH = ();
154 # FIXME: We are initializing these variables into both Safe::Root1 (the cached safe compartment) 154 # FIXME: We are initializing these variables into both Safe::Root1 (the cached safe compartment)
155 # and Safe::Root2 (the current one) 155 # and Safe::Root2 (the current one)
156 # There is a good chance they won't be properly updated in one or the other of these compartments. 156 # There is a good chance they won't be properly updated in one or the other of these compartments.
157 157
158
158# @main::PG_ANSWER_ENTRY_ORDER = (); 159# @main::PG_ANSWER_ENTRY_ORDER = ();
159# $main::ANSWER_PREFIX = 'AnSwEr'; 160# $main::ANSWER_PREFIX = 'AnSwEr';
160# %main::PG_FLAGS=(); #global flags 161# %main::PG_FLAGS=(); #global flags
161# $main::showPartialCorrectAnswers = 0 unless defined($main::showPartialCorrectAnswers ); 162# $main::showPartialCorrectAnswers = 0 unless defined($main::showPartialCorrectAnswers );
162# $main::showHint = 1 unless defined($main::showHint); 163# $main::showHint = 1 unless defined($main::showHint);
163# $main::solutionExists =0; 164# $main::solutionExists =0;
164# $main::hintExists =0; 165# $main::hintExists =0;
165# %main::gifs_created = (); 166# %main::gifs_created = ();
166 eval(q! 167 eval(q!
168 # set perl to use capital E for scientific notation: e.g. 5.4E-05 instead of 5.4e-05
169 $#="%G"; #FIXME -- check that this works
170
167 @main::PG_ANSWER_ENTRY_ORDER = (); 171 @main::PG_ANSWER_ENTRY_ORDER = ();
168 $main::ANSWER_PREFIX = 'AnSwEr'; 172 $main::ANSWER_PREFIX = 'AnSwEr';
169 %main::PG_FLAGS=(); #global flags 173 %main::PG_FLAGS=(); #global flags
170 $main::showPartialCorrectAnswers = 0 unless defined($main::showPartialCorrectAnswers ); 174 $main::showPartialCorrectAnswers = 0 unless defined($main::showPartialCorrectAnswers );
171 $main::showHint = 1 unless defined($main::showHint); 175 $main::showHint = 1 unless defined($main::showHint);

Legend:
Removed from v.5568  
changed lines
  Added in v.5626

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9