Log Message:
-----------
minor changes to help with debugging
Modified Files:
--------------
pg/macros:
AppletObjects.pl
Revision Data
-------------
Index: AppletObjects.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/AppletObjects.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -Lmacros/AppletObjects.pl -Lmacros/AppletObjects.pl -u -r1.10 -r1.11
--- macros/AppletObjects.pl
+++ macros/AppletObjects.pl
@@ -85,14 +85,17 @@
//////////////////////////////////////////////////////////
function submitAction() {
- alert("Begin submitAction!!!!!");
- if (debug) {debugText = "Begin looping through applet_submitAction_list\n";}
+
+ if (debug) {
+ debugText = " Begin looping through applet_submitAction_list\n";
+ }
for (var applet in applet_submitAction_list) {
- //alert(applet);
+
applet_submitAction_list[applet]();
}
- if (debug) {alert(debugText); debugText="";};
- return(1);
+ if (debug) {
+ alert(debugText); debugText="";
+ };
}
function initializeAction() {
var iMax = 10;
@@ -295,6 +298,7 @@
# insert a hidden variable to hold the applet's state (debug =>1 makes it visible for debugging and provides debugging buttons)
#######
my $base_64_encoded_answer_value = ($answer_value =~/<XML|<?xml/i)? encode_base64($answer_value) : $answer_value;
+ $base_64_encoded_answer_value =~ s/\r|\n//g; # get rid of line returns
my $decoded_answer_value = ($answer_value =~/<XML|<?xml/i) ? $answer_value : decode_base64($answer_value);
my $debug_input_element = qq!\n<textarea rows="4" cols="80"
name = "$appletStateName">$decoded_answer_value</textarea><br/>
|
