[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 6023 Revision 6025
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.18 2009/03/10 12:10:36 gage Exp $ 4# $CVSHeader: pg/lib/Applet.pm,v 1.19 2009/03/10 20:48:51 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.
282 debug => 0, 282 debug => 0,
283 @_, 283 @_,
284 }; 284 };
285 bless $self, $class; 285 bless $self, $class;
286 $self->initialState('<xml></xml>'); 286 $self->initialState('<xml></xml>');
287 if ($self->{returnFieldName}) or $self->{answerBox} ) { # backward compatibility 287 if ($self->{returnFieldName} or $self->{answerBox} ) { # backward compatibility
288 warn "use answerBoxAlias instead of returnFieldName or answerBox"; 288 warn "use answerBoxAlias instead of returnFieldName or answerBox";
289 $self->{answerBox}=''; 289 $self->{answerBox}='';
290 $self->{returnFieldName}=''; 290 $self->{returnFieldName}='';
291 } 291 }
292 if ($self->{configAlias}) { # backward compatibility 292 if ($self->{configAlias}) { # backward compatibility

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

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9