[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 6021 Revision 6023
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.17 2009/02/19 16:35:26 gage Exp $ 4# $CVSHeader: pg/lib/Applet.pm,v 1.18 2009/03/10 12:10:36 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.
266 base64_config => undef, # this is the initial (and final?) configuration 266 base64_config => undef, # this is the initial (and final?) configuration
267# configuration => '', # configuration defining the applet 267# configuration => '', # configuration defining the applet
268 initialState => '', # initial state. (I'm considering storing everything as ascii and converting on the fly to base64 when needed.) 268 initialState => '', # initial state. (I'm considering storing everything as ascii and converting on the fly to base64 when needed.)
269 getStateAlias => 'getXML', 269 getStateAlias => 'getXML',
270 setStateAlias => 'setXML', 270 setStateAlias => 'setXML',
271 configAlias => '', 271 configAlias => '', # deprecated
272 getConfigAlias => 'getConfig', 272 getConfigAlias => 'getConfig',
273 setConfigAlias => 'setConfig', 273 setConfigAlias => 'setConfig',
274 initializeActionAlias => 'setXML', 274 initializeActionAlias => 'setXML',
275 submitActionAlias => 'getXML', 275 submitActionAlias => 'getXML',
276 submitActionScript => '', # script executed on submitting the WW question 276 submitActionScript => '', # script executed on submitting the WW question
277 answerBox => 'answerBox', 277 answerBoxAlias => 'answerBox',
278 answerBox => '', # deprecated
279 returnFieldName => '', # deprecated
278 headerText => DEFAULT_HEADER_TEXT(), 280 headerText => DEFAULT_HEADER_TEXT(),
279 objectText => '', 281 objectText => '',
280 debug => 0, 282 debug => 0,
281 @_, 283 @_,
282 }; 284 };
283 bless $self, $class; 285 bless $self, $class;
284 $self->initialState('<xml></xml>'); 286 $self->initialState('<xml></xml>');
287 if ($self->{returnFieldName}) or $self->{answerBox} ) { # backward compatibility
288 warn "use answerBoxAlias instead of returnFieldName or answerBox";
289 $self->{answerBox}='';
290 $self->{returnFieldName}='';
291 }
285 if ($self->{configAlias}) { # backward compatibility 292 if ($self->{configAlias}) { # backward compatibility
286 warn "use setConfigAlias instead of configAlias"; 293 warn "use setConfigAlias instead of configAlias";
287 $self->{configAlias}=''; 294 $self->{configAlias}='';
288 } 295 }
289 $self->config('<xml></xml>'); 296 $self->config('<xml></xml>');

Legend:
Removed from v.6021  
changed lines
  Added in v.6023

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9