[system] / trunk / pg / lib / Applet.pm Repository:
ViewVC logotype

Diff of /trunk/pg/lib/Applet.pm

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

Revision 5676 Revision 5994
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/lib/Applet.pm,v 1.11 2008/05/12 00:50:23 gage Exp $ 4# $CVSHeader: pg/lib/Applet.pm,v 1.14 2009/01/28 17:07:08 gage 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.
99use MIME::Base64 qw( encode_base64 decode_base64); 99use MIME::Base64 qw( encode_base64 decode_base64);
100 100
101 101
102=head2 Default javaScript functions placed in header 102=head2 Default javaScript functions placed in header
103 103
104=pod
105
104These functions are automatically defined for use for 106These functions are automatically defined for use for
105any javaScript placed in the text of a PG question. 107any javaScript placed in the text of a PG question.
106 108
107 getApplet(appletName) -- finds the applet path in the DOM 109 getApplet(appletName) -- finds the applet path in the DOM
108 110
109 submitAction() -- calls the submit action of the applets 111 submitAction() -- calls the submit action of the applets
110
111 112
112 initializeAction() -- calls the initialize action of the applets 113 initializeWWquestion() -- calls the initialize action of the applets
113 114
114 getQE(name) -- gets an HTML element of the question by name 115 getQE(name) -- gets an HTML element of the question by name
115 or by id. Be sure to keep all names and ids 116 or by id. Be sure to keep all names and ids
116 unique within a given PG question. 117 unique within a given PG question.
117 118
118 getQuestionElement(name) -- long form of getQE(name) 119 getQuestionElement(name) -- long form of getQE(name)
119 120
120 listQuestionElements() -- for discovering the names of inputs in the 121 listQuestionElements() -- for discovering the names of inputs in the
121 PG question. An alert dialog will list all 122 PG question. An alert dialog will list all
122 of the elements. 123 of the elements.
123 Usage: Place this at the END of the question, 124 Usage: Place this at the END of the question, just before END_DOCUMENT():
124 just before END_DOCUMENT():
125 125
126 TEXT(qq!<script> listQuestionElements() </script>!); 126 TEXT(qq!<script> listQuestionElements() </script>!);
127 ENDDOCUMENT(); 127 ENDDOCUMENT();
128 to obtain a list of all of the HTML elements in the question
129
130 List of accessor methods made available by the FlashApplet class:
131 Usage: $current_value = $applet->method(new_value or empty)
132 These can also be set when creating the class -- for exampe:
133 $applet = new FlashApplet(
134 # can be replaced by $applet =FlashApplet() when using AppletObjects.pl
135 codebase => findAppletCodebase("$appletName.swf"),
136 appletName => $appletName,
137 appletId => $appletName,
138 submitActionAlias => 'checkAnswer',
139 );
128 140
129 list of accessor methods format: current_value = $self->method(new_value or empty)
130 141
131 appletId for simplicity and reliability appletId and appletName are always the same 142 appletId for simplicity and reliability appletId and appletName are always the same
132 appletName 143 appletName
133
134 archive the name of the .jar file containing the applet code 144 archive the name of the .jar file containing the applet code
135 code the name of the applet code in the .jar archive 145 code the name of the applet code in the .jar archive
136 codebase a prefix url used to find the archive and the applet itself 146 codebase a prefix url used to find the archive and the applet itself
137 147
138 height rectangle alloted in the html page for displaying the applet 148 height rectangle alloted in the html page for displaying the applet
139 width 149
140
141 params an anonymous array containing name/value pairs 150 params an anonymous array containing name/value pairs
142 to configure the applet [name =>'value, ...] 151 to configure the applet [name =>'value, ...]
143 152
144 header stores the text to be added to the header section of the html page 153 header stores the text to be added to the header section of the html page
145 object stores the text which places the applet on the html page 154 object stores the text which places the applet on the html page
146 155
147 debug in debug mode several alerts mark progress through the procedure of calling the applet 156 debug in debug mode several alerts mark progress through the procedure of calling the applet
148 157
149 config configuration are those customizable attributes of the applet which don't 158 config configuration are those customizable attributes of the applet which don't
150 change as it is used. When stored in hidden answer fields 159 change as it is used. When stored in hidden answer fields
151 it is usually stored in base64 encoded format. 160 it is usually stored in base64 encoded format.
152 base64_config base64 encode version of the contents of config 161 base64_config base64 encode version of the contents of config
153 162
154 configAlias (default: config ) names the applet command called with the contents of $self->config 163 configAlias (default: config ) names the applet command called with the contents of $self->config
155 to configure the applet. The parameters are passed to the applet in plain text using <xml> 164 to configure the applet. The parameters are passed to the applet in plain text using <xml>
156 The outer tags must be <xml> ..... </xml> 165 The outer tags must be <xml> ..... </xml>
157 state state consists of those customizable attributes of the applet which change 166 state state consists of those customizable attributes of the applet which change
158 as the applet is used. It is stored by the calling .pg question so that 167 as the applet is used. It is stored by the calling .pg question so that
159 when revisiting the question the applet 168 when revisiting the question the applet
160 will be restored to the same state it was left in when the question was last 169 will be restored to the same state it was left in when the question was last
161 viewed. 170 viewed.
162 171
163 getStateAlias (default: getState) alias for command called to read the current state of the applet. 172 getStateAlias (default: getState) alias for command called to read the current state of the applet.
164 The state is passed in plain text xml format with outer tags: <xml>....</xml> 173 The state is passed in plain text xml format with outer tags: <xml>....</xml>
165 setStateAlias (default: setState) alias for the command called to reset the state of the applet. 174 setStateAlias (default: setState) alias for the command called to reset the state of the applet.
166 The state is passed in plain text in xml format with outer tags: <xml>....</xml> 175 The state is passed in plain text in xml format with outer tags: <xml>....</xml>
167 176
168 base64_state returns the base64 encoded version of the state stored in the applet object. 177 base64_state returns the base64 encoded version of the state stored in the applet object.
169 178
170 initializeActionAlias -- (default: initializeAction) the name of the javaScript subroutine called to initialize the applet (some overlap with config/ and setState 179 initializeActionAlias -- (default: initializeAction) the name of the javaScript subroutine called to initialize the applet (some overlap with config/ and setState
171 submitActionAlias -- (default: submitAction)the name of the javaScript subroutine called when the submit button of the 180 submitActionAlias -- (default: submitAction)the name of the javaScript subroutine called when the submit button of the
172 .pg question is pressed. 181 .pg question is pressed.
182 answerBox -- name of answer box to return answer to: default defaultAnswerBox
183 getAnswer -- (formerly sendData) get student answer from applet and place in answerBox
184 returnFieldName -- (deprecated) synonmym for answerBox
173 185
174 returnFieldName
175
176
177
178
179 186
180=cut 187=cut
181 188
182 189
183 190
197 getStateAlias => 'getXML', 204 getStateAlias => 'getXML',
198 setStateAlias => 'setXML', 205 setStateAlias => 'setXML',
199 configAlias => 'config', 206 configAlias => 'config',
200 initializeActionAlias => 'setXML', 207 initializeActionAlias => 'setXML',
201 submitActionAlias => 'getXML', 208 submitActionAlias => 'getXML',
202 returnFieldName => 'receivedField', 209 submitActionScript => '', # script executed on submitting the WW question
210 answerBox => 'answerBox',
203 headerText => DEFAULT_HEADER_TEXT(), 211 headerText => DEFAULT_HEADER_TEXT(),
204 objectText => '', 212 objectText => '',
205 debug => 0, 213 debug => 0,
206 @_, 214 @_,
207 }; 215 };
250sub submitActionAlias { 258sub submitActionAlias {
251 my $self = shift; 259 my $self = shift;
252 $self->{submitActionAlias} = shift ||$self->{submitActionAlias}; # replace the current contents if non-empty 260 $self->{submitActionAlias} = shift ||$self->{submitActionAlias}; # replace the current contents if non-empty
253 $self->{submitActionAlias}; 261 $self->{submitActionAlias};
254} 262}
263sub submitActionScript {
264 my $self = shift;
265 $self->{submitActionScript} = shift ||$self->{submitActionScript}; # replace the current contents if non-empty
266 $self->{submitActionScript};
267}
255sub getStateAlias { 268sub getStateAlias {
256 my $self = shift; 269 my $self = shift;
257 $self->{getStateAlias} = shift ||$self->{getStateAlias}; # replace the current contents if non-empty 270 $self->{getStateAlias} = shift ||$self->{getStateAlias}; # replace the current contents if non-empty
258 $self->{getStateAlias}; 271 $self->{getStateAlias};
259} 272}
268 $self->{configAlias} = shift ||$self->{configAlias}; # replace the current contents if non-empty 281 $self->{configAlias} = shift ||$self->{configAlias}; # replace the current contents if non-empty
269 $self->{configAlias}; 282 $self->{configAlias};
270} 283}
271sub returnFieldName { 284sub returnFieldName {
272 my $self = shift; 285 my $self = shift;
273 $self->{returnFieldName} = shift ||$self->{returnFieldName}; # replace the current contents if non-empty 286 $self->{answerBox} = shift ||$self->{answerBox}; # replace the current contents if non-empty
274 $self->{returnFieldName}; 287 $self->{answerBox};
288}
289sub answerBox {
290 my $self = shift;
291 $self->{answerBox} = shift ||$self->{answerBox}; # replace the current contents if non-empty
292 $self->{answerBox};
275} 293}
276sub codebase { 294sub codebase {
277 my $self = shift; 295 my $self = shift;
278 $self->{codebase} = shift ||$self->{codebase}; # replace the current codebase if non-empty 296 $self->{codebase} = shift ||$self->{codebase}; # replace the current codebase if non-empty
279 $self->{codebase}; 297 $self->{codebase};
347 my $appletId = $self->appletId; 365 my $appletId = $self->appletId;
348 my $appletName = $self->appletName; 366 my $appletName = $self->appletName;
349 my $base64_initialState = $self->base64_state; 367 my $base64_initialState = $self->base64_state;
350 my $initializeAction = $self->initializeActionAlias; 368 my $initializeAction = $self->initializeActionAlias;
351 my $submitAction = $self->submitActionAlias; 369 my $submitAction = $self->submitActionAlias;
370 my $submitActionScript = $self->submitActionScript;
352 my $setState = $self->setStateAlias; 371 my $setState = $self->setStateAlias;
353 my $getState = $self->getStateAlias; 372 my $getState = $self->getStateAlias;
354 my $config = $self->configAlias; 373 my $config = $self->configAlias;
355 my $base64_config = $self->base64_config; 374 my $base64_config = $self->base64_config;
356 my $debugMode = ($self->debug) ? "1": "0"; 375 my $debugMode = ($self->debug) ? "1": "0";
357 my $returnFieldName = $self->{returnFieldName}; 376 my $returnFieldName = $self->{returnFieldName};
358# my $encodeStateQ = ($self->debug)?'' : "state = Base64.encode(state);"; # in debug mode base64 encoding is not used. 377 my $answerBox = $self->{answerBox};
359# my $decodeStateQ = "if (!state.match(/<XML>*/i) ) {state = Base64.decode(state)}"; # decode if <XML> is not present
360 my $headerText = $self->header(); 378 my $headerText = $self->header();
361 379
362 $headerText =~ s/(\$\w+)/$1/gee; # interpolate variables p17 of Cookbook 380 $headerText =~ s/(\$\w+)/$1/gee; # interpolate variables p17 of Cookbook
363 381
364 return $headerText; 382 return $headerText;
387 405
388 $objectText = $self->{objectText}; 406 $objectText = $self->{objectText};
389 $objectText =~ s/(\$\w+)/$1/gee; 407 $objectText =~ s/(\$\w+)/$1/gee;
390 return $objectText; 408 return $objectText;
391} 409}
392sub initialize { 410# sub initialize {
393 my $self = shift; 411# my $self = shift;
394 return q{ 412# return q{
395 <script> 413# <script>
396 initializeAction(); 414# initializeAllApplets();
397 // this should really be done in the <body> tag 415# // this should really be done in the <body> tag
398 </script> 416# </script>
399 }; 417# };
400 418#
401} 419# }
402######################################################## 420########################################################
403# HEADER material for one flash or java applet 421# HEADER material for one flash or java applet
404######################################################## 422########################################################
405 423
406use constant DEFAULT_HEADER_TEXT =><<'END_HEADER_SCRIPT'; 424use constant DEFAULT_HEADER_TEXT =><<'END_HEADER_SCRIPT';
407 425 <script src="/webwork2_files/js/Base64.js" language="javascript">
426 </script>
427 <script src="/webwork2_files/js/ww_applet_support.js">
428 //upload functions stored in /opt/webwork/webwork2/htdocs/js ...
429 </script>
408 <script language="JavaScript"> 430 <script language="JavaScript">
409 431
410 // set debug mode for this applet 432 // set debug mode for this applet
411 set_debug($debugMode); 433 set_debug($debugMode);
434
435 //////////////////////////////////////////////////////////
436 //TEST code
437 //
438 //
439 //////////////////////////////////////////////////////////
440
441 ww_applet_list["$appletName"] = new ww_applet("$appletName");
442
443
444 ww_applet_list["$appletName"].code = "$code";
445 ww_applet_list["$appletName"].codebase = "$codebase";
446 ww_applet_list["$appletName"].appletID = "$appletID";
447 ww_applet_list["$appletName"].base64_state = "$base64_initializationState";
448 ww_applet_list["$appletName"].base64_config = "$base64_config";
449 ww_applet_list["$appletName"].getStateAlias = "$getState";
450 ww_applet_list["$appletName"].setStateAlias = "$setState";
451 ww_applet_list["$appletName"].configAlias = "$config";
452 ww_applet_list["$appletName"].initializeActionAlias = "$initializeAction";
453 ww_applet_list["$appletName"].submitActionAlias = "$submitAction";
454 ww_applet_list["$appletName"].submitActionScript = "$submitActionScript";
455 ww_applet_list["$appletName"].answerBox = "$answerBox";
456 ww_applet_list["$appletName"].debug = "$debugMode";
457
412 458
413 ////////////////////////////////////////////////////////// 459 //////////////////////////////////////////////////////////
414 //CONFIGURATIONS 460 //CONFIGURATIONS
415 // 461 //
416 // configurations are "permanent" 462 // configurations are "permanent"
417 ////////////////////////////////////////////////////////// 463 //////////////////////////////////////////////////////////
418 464
419 applet_config_list["$appletName"] = function() { 465// applet_config_list["$appletName"] = function() {
420 debug_add("applet_config_list:\n attempt to configure $appletName . $config ( $base64_config ) if config function is defined: " 466// debug_add("applet_config_list:\n attempt to configure $appletName . $config ( $base64_config ) if config function is defined: "
421 ); 467// );
422 try { 468// try {
423 if (( typeof(getApplet("$appletName").$config) == "function" ) ) { 469// if (( typeof(getApplet("$appletName").$config) == "function" ) ) {
424 debug_add("CONFIGURE $appletName"); 470// debug_add("CONFIGURE $appletName");
425 getApplet("$appletName").$config(Base64.decode("$base64_config")); 471// getApplet("$appletName").$config(Base64.decode("$base64_config"));
426 } 472// }
427 } catch(e) { 473// } catch(e) {
428 alert("Error executing configuration command $config for $appletName: " + e ); 474// alert("Error executing configuration command $config for $appletName: " + e );
429 } 475// }
430 } 476// }
431 //////////////////////////////////////////////////////////// 477// ////////////////////////////////////////////////////////////
432 // 478// //
433 //STATE: 479// //STATE:
434 // state can vary as the applet is manipulated -- it is reset from the questions _state values 480// // state can vary as the applet is manipulated -- it is reset from the questions _state values
435 // 481// //
436 ////////////////////////////////////////////////////////// 482// //////////////////////////////////////////////////////////
437 483//
438 applet_setState_list["$appletName"] = function(state) { 484// applet_setState_list["$appletName"] = function(state) {
439 debug_add("Begin setState for applet $appletName"); 485// debug_add("Begin setState for applet $appletName");
440 debug_add("Obtain state from $appletName"+"_state"); 486// debug_add("Obtain state from $appletName"+"_state");
441 state = state || getQE("$appletName"+"_state").value; 487// state = state || getQE("$appletName"+"_state").value;
442 if ( base64Q(state) ) { 488// if ( base64Q(state) ) {
443 state=Base64.decode(state); 489// state=Base64.decode(state);
444 } 490// }
445 if (state.match(/<xml/i) || state.match(/<?xml/i) ) { // if state starts with <?xml 491// if (state.match(/<xml/i) || state.match(/<?xml/i) ) { // if state starts with <?xml
446 492//
447 debug_add("applet_setState_list: \n set (decoded) state for $appletName to " + 493// debug_add("applet_setState_list: \n set (decoded) state for $appletName to " +
448 state +"\nfunction type is " +typeof(getApplet("$appletName").$setState) 494// state +"\nfunction type is " +typeof(getApplet("$appletName").$setState)
449 ); 495// );
450 try { 496// try {
451 if (( typeof(getApplet("$appletName").$setState) =="function" ) ) { 497// if (( typeof(getApplet("$appletName").$setState) =="function" ) ) {
452 debug_add("setState for $appletName"); 498// debug_add("setState for $appletName");
453 getApplet("$appletName").$setState( state ); 499// getApplet("$appletName").$setState( state );
454 } 500// }
455 } catch(e) { 501// } catch(e) {
456 alert("Error in setting state of $appletName using command $setState : " + e ); 502// alert("Error in setting state of $appletName using command $setState : " + e );
457 } 503// }
458 } else if (debug) { 504// } else if (debug) {
459 alert("new state was empty string or did not begin with <xml-- state was not reset"); 505// alert("new state was empty string or did not begin with <xml-- state was not reset");
460 } 506// }
461 }; 507// };
462 applet_getState_list["$appletName"] = function () { 508// applet_getState_list["$appletName"] = function () {
463 debug_add("get current state for applet $appletName and store it in $appletName"+"_state"); 509// debug_add("get current state for applet $appletName and store it in $appletName"+"_state");
464 var applet = getApplet("$appletName"); 510// var applet = getApplet("$appletName");
465 try { 511// try {
466 if (( typeof(applet.$getState) == "function" ) ) { // there may be no state function 512// if (( typeof(applet.$getState) == "function" ) ) { // there may be no state function
467 state = applet.$getState(); // get state in xml format 513// state = applet.$getState(); // get state in xml format
468 debug_add("state has type " + typeof(state)); 514// debug_add("state has type " + typeof(state));
469 state = String(state); // geogebra returned an object type instead of a string type 515// state = String(state); // geogebra returned an object type instead of a string type
470 debug_add("state converted to type " + typeof(state)); 516// debug_add("state converted to type " + typeof(state));
471 } 517// }
472 518//
473 if (!debug) { 519// if (!debug) {
474 state = Base64.encode(state); 520// state = Base64.encode(state);
475 }; // replace state by encoded version unless in debug mode 521// }; // replace state by encoded version unless in debug mode
476 522//
477 debug_add("state is "+state); // this should still be in plain text 523// debug_add("state is "+state); // this should still be in plain text
478 getQE("$appletName"+"_state").value = state; //place state in input item (debug: textarea, otherwise: hidden) 524// getQE("$appletName"+"_state").value = state; //place state in input item (debug: textarea, otherwise: hidden)
479 } catch (e) { 525// } catch (e) {
480 alert("Error in getting state for $appletName " + e ); 526// alert("Error in getting state for $appletName " + e );
481 } 527// }
482 }; 528// };
483 529//
484 //////////////////////////////////////////////////////////// 530// ////////////////////////////////////////////////////////////
485 // 531// //
486 //INITIALIZE 532// //INITIALIZE
487 // 533// //
488 //////////////////////////////////////////////////////////// 534// ////////////////////////////////////////////////////////////
489 535//
490 536//
491 applet_checkLoaded_list["$appletName"] = function() { // this function returns 0 unless: 537// applet_checkLoaded_list["$appletName"] = function() { // this function returns 0 unless:
492 // applet has already been flagged as ready in applet_isReady_list 538// // applet has already been flagged as ready in applet_isReady_list
493 // applet.config is defined (or alias for .config) 539// // applet.config is defined (or alias for .config)
494 // applet.setState is defined 540// // applet.setState is defined
495 // applet.isActive is defined 541// // applet.isActive is defined
496 // applet reported that it is loaded by calling loadQ() 542// // applet reported that it is loaded by calling loadQ()
497 var ready = 0; 543// var ready = 0;
498 var applet = getApplet("$appletName"); 544// var applet = getApplet("$appletName");
499 if (!debug && applet_isReady_list["$appletName"]) {return(1)}; // memorize readiness in non-debug mode 545// if (!debug && applet_isReady_list["$appletName"]) {return(1)}; // memorize readiness in non-debug mode
500 if ( typeof(applet.$config) == "function") { 546// if ( typeof(applet.$config) == "function") {
501 debug_add( "applet.config is " + typeof(applet.$config) ); 547// debug_add( "applet.config is " + typeof(applet.$config) );
502 ready = 1; 548// ready = 1;
503 } 549// }
504 if( typeof(applet.$getState) == "function") { 550// if( typeof(applet.$getState) == "function") {
505 debug_add( "applet.getState is " + typeof(applet.$getState) ); 551// debug_add( "applet.getState is " + typeof(applet.$getState) );
506 ready =1; 552// ready =1;
507 } 553// }
508 if (typeof(applet.isActive) == "function" && applet.isActive ) { 554// if (typeof(applet.isActive) == "function" && applet.isActive ) {
509 debug_add( "applet.isActive is " + typeof(applet.isActive) ); 555// debug_add( "applet.isActive is " + typeof(applet.isActive) );
510 ready =1; 556// ready =1;
511 } 557// }
512 if (typeof(applet_reportsLoaded_list["$appletName"]) !="undefined" && applet_reportsLoaded_list["$appletName"] != 0 ) { 558// if (typeof(applet_reportsLoaded_list["$appletName"]) !="undefined" && applet_reportsLoaded_list["$appletName"] != 0 ) {
513 debug_add( "applet reports that it is loaded " + applet_reportsLoaded_list["$appletName"] ); 559// debug_add( "applet reports that it is loaded " + applet_reportsLoaded_list["$appletName"] );
514 ready =1; 560// ready =1;
515 } 561// }
516 applet_isReady_list["$appletName"]= ready; 562// applet_isReady_list["$appletName"]= ready;
517 return(ready); 563// return(ready);
518 } 564// }
519 565//
520 applet_initializeAction_list["$appletName"] = function (state) { 566// applet_initializeAction_list["$appletName"] = function (state) {
521 applet_setState_list["$appletName"](state); 567// applet_setState_list["$appletName"](state);
522 }; 568// };
523 569//
524 applet_submitAction_list["$appletName"] = function () { 570// applet_submitAction_list["$appletName"] = function () {
525 if (! applet_isReady_list["$appletName"] ) { 571// if (! applet_isReady_list["$appletName"] ) {
526 alert("$appletName is not ready"); 572// alert("$appletName is not ready");
527 } 573// }
528 applet_getState_list["$appletName"](); 574// applet_getState_list["$appletName"]();
575// $submitActionScript
529 //getQE("$returnFieldName").value = getApplet("$appletName").sendData(); //FIXME -- not needed in general? 576// //getQE("$answerBox").value = getApplet("$appletName").getAnswer(); //FIXME -- not needed in general?
530 }; 577// };
531 </script> 578 </script>
532 579
533END_HEADER_SCRIPT 580END_HEADER_SCRIPT
534 581
535package FlashApplet; 582package FlashApplet;
536@ISA = qw(Applet); 583@ISA = qw(Applet);
537 584
538 585
586=head2 Insertion HTML code for FlashApplet
539 587
540=pod 588=pod
541 589
542The secret to making this applet work with IE in addition to normal browsers 590The secret to making this applet work with IE in addition to normal browsers
543is the addition of the C(<form></form>) construct just before the object. 591is the addition of the C(<form></form>) construct just before the object.
604 652
605 653
606package JavaApplet; 654package JavaApplet;
607@ISA = qw(Applet); 655@ISA = qw(Applet);
608 656
609 657=head2 Insertion HTML code for JavaApplet
610 658
611=pod 659=pod
612 660
613The secret to making this applet work with IE in addition to normal browsers 661The secret to making this applet work with IE in addition to normal browsers
614is the addition of the C(<form></form>) construct just before the object. 662is the addition of the C(<form></form>) construct just before the object.

Legend:
Removed from v.5676  
changed lines
  Added in v.5994

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9