Menu
▾
▴
formmagick-devel — Developers of FormMagick
You can subscribe to this list here.
| 2000 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(49) |
Dec
(13) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2001 |
Jan
(4) |
Feb
(88) |
Mar
(83) |
Apr
(2) |
May
(1) |
Jun
(48) |
Jul
(8) |
Aug
(14) |
Sep
(28) |
Oct
(195) |
Nov
|
Dec
(5) |
| 2002 |
Jan
(125) |
Feb
(70) |
Mar
(11) |
Apr
(26) |
May
(17) |
Jun
(8) |
Jul
|
Aug
|
Sep
(3) |
Oct
|
Nov
|
Dec
(20) |
| 2003 |
Jan
|
Feb
(2) |
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|
From: Mark K. <seg...@us...> - 2003-02-05 20:16:43
|
Update of /cvsroot/formmagick/formmagick/lib/CGI In directory sc8-pr-cvs1:/tmp/cvs-serv23766/lib/CGI Modified Files: FormMagick.pm Log Message: Updated to 0.89, and changed author details to Mitel Networks Corp in Makefile. Index: FormMagick.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v retrieving revision 1.128 retrieving revision 1.129 diff -C2 -r1.128 -r1.129 *** FormMagick.pm 5 Feb 2003 17:18:32 -0000 1.128 --- FormMagick.pm 5 Feb 2003 20:16:36 -0000 1.129 *************** *** 11,15 **** package CGI::FormMagick; ! my $VERSION = $VERSION = "0.87"; use XML::Parser; --- 11,15 ---- package CGI::FormMagick; ! my $VERSION = $VERSION = "0.89"; use XML::Parser; |
|
From: Mark K. <seg...@us...> - 2003-02-05 20:16:43
|
Update of /cvsroot/formmagick/formmagick
In directory sc8-pr-cvs1:/tmp/cvs-serv23766
Modified Files:
Makefile.PL
Log Message:
Updated to 0.89, and changed author details to Mitel Networks Corp in Makefile.
Index: Makefile.PL
===================================================================
RCS file: /cvsroot/formmagick/formmagick/Makefile.PL,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -r1.23 -r1.24
*** Makefile.PL 13 May 2002 16:29:21 -0000 1.23
--- Makefile.PL 5 Feb 2003 20:16:35 -0000 1.24
***************
*** 26,30 ****
($] >= 5.005 ? ## Add these new keywords supported since 5.005
(ABSTRACT_FROM => 'lib/CGI/FormMagick.pm', # retrieve abstract from module
! AUTHOR => 'Kirrily "Skud" Robert <sk...@cp...>') : ()),
);
--- 26,30 ----
($] >= 5.005 ? ## Add these new keywords supported since 5.005
(ABSTRACT_FROM => 'lib/CGI/FormMagick.pm', # retrieve abstract from module
! AUTHOR => 'Mitel Networks Corp. <mi...@cp...>') : ()),
);
|
|
From: 'Kirrily 'S. R. <sk...@in...> - 2002-12-19 04:05:53
|
On Wed, Dec 18, 2002 at 10:43:51PM -0500, Mark Knox wrote: | [1] I do mean "looked", not diffed or seriously compared. Well, perhaps you should have diffed. I just did, and there are small but probably significant changes in the FM version of it, mostly related to taint-friendliness if I recall correctly. K. -- Kirrily 'Skud' Robert - sk...@in... - http://infotrope.net/ "Why is it that all the good ones are either gay or BSD weenies?" -- Sharkey (from the Netizen quotes file) |
|
From: Mark K. <ma...@pi...> - 2002-12-19 03:44:57
|
> On Wed, Dec 18, 2002 at 12:13:15PM -0800, Mark Knox wrote: > | Remove Persistence::Object::Simple and CGI::Persistent from=20 > the repository.=20 >=20 > Why? Those were there for a reason. Has the author of those modules > included my patches yet? I didn't know you'd made any - last time I looked[1], they looked = identical to CPAN's version, so I guess that's a yes. SME has been using the CPAN versions of P:O:S and CGI::P with a couple of our own patches, and they work fine. I removed them because they don't appear to be required (anymore). [1] I do mean "looked", not diffed or seriously compared. |
|
From: Kirrily 'S. R. <sk...@in...> - 2002-12-19 03:25:35
|
On Wed, Dec 18, 2002 at 12:44:56PM -0800, Mark Knox wrote: | | + 0.87 | + ---- | + An HTML error (missing > symbol) was making the script print only the | + first error message if a field was failing more than one validation. | + This change wasn't included in your CVS commit. And the stuff you listed in your CVS commit doesn't appear to have been added to the changelog. Please fix. K. -- Kirrily 'Skud' Robert - sk...@in... - http://infotrope.net/ The best book on programming for the layman is 'Alice in Wonderland', but that's because it's the best book on anything for the layman. |
|
From: Kirrily 'S. R. <sk...@in...> - 2002-12-19 03:20:21
|
On Wed, Dec 18, 2002 at 12:13:15PM -0800, Mark Knox wrote: | Remove Persistence::Object::Simple and CGI::Persistent from the repository. Why? Those were there for a reason. Has the author of those modules included my patches yet? K. -- Kirrily 'Skud' Robert - sk...@in... - http://infotrope.net/ Education is that which remains, if one has forgotten everything they learned in school. |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick/examples In directory sc8-pr-cvs1:/tmp/cvs-serv5801/examples Modified Files: buttons.pl checkbox.pl fileupload.pl fragments.pl group-default.pl hello-repeat.pl hello.pl lexicon.pl localise-errormsg.pl localise-options.pl pre.pl taint.pl validations.pl Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: buttons.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/buttons.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** buttons.pl 31 Jan 2002 23:36:09 -0000 1.1 --- buttons.pl 18 Dec 2002 21:37:05 -0000 1.2 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -w + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; Index: checkbox.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/checkbox.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -r1.2 -r1.3 *** checkbox.pl 4 Feb 2002 22:53:25 -0000 1.2 --- checkbox.pl 18 Dec 2002 21:37:05 -0000 1.3 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -w + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: fileupload.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/fileupload.pl,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -r1.5 -r1.6 *** fileupload.pl 22 Jan 2002 21:43:09 -0000 1.5 --- fileupload.pl 18 Dec 2002 21:37:05 -0000 1.6 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -w + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; Index: fragments.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/fragments.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** fragments.pl 23 Jan 2002 22:55:42 -0000 1.3 --- fragments.pl 18 Dec 2002 21:37:05 -0000 1.4 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -w + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; Index: group-default.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/group-default.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** group-default.pl 22 Jan 2002 21:16:02 -0000 1.3 --- group-default.pl 18 Dec 2002 21:37:05 -0000 1.4 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; Index: hello-repeat.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/hello-repeat.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** hello-repeat.pl 4 Apr 2002 17:18:41 -0000 1.3 --- hello-repeat.pl 18 Dec 2002 21:37:05 -0000 1.4 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; Index: hello.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/hello.pl,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -r1.4 -r1.5 *** hello.pl 21 Jan 2002 19:22:26 -0000 1.4 --- hello.pl 18 Dec 2002 21:37:05 -0000 1.5 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: lexicon.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/lexicon.pl,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -r1.5 -r1.6 *** lexicon.pl 31 Jan 2002 23:36:09 -0000 1.5 --- lexicon.pl 18 Dec 2002 21:37:05 -0000 1.6 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: localise-errormsg.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/localise-errormsg.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** localise-errormsg.pl 13 Mar 2002 20:55:26 -0000 1.1 --- localise-errormsg.pl 18 Dec 2002 21:37:05 -0000 1.2 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: localise-options.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/localise-options.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -r1.2 -r1.3 *** localise-options.pl 8 Feb 2002 20:08:03 -0000 1.2 --- localise-options.pl 18 Dec 2002 21:37:05 -0000 1.3 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: pre.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/pre.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -r1.3 -r1.4 *** pre.pl 4 Feb 2002 20:10:15 -0000 1.3 --- pre.pl 18 Dec 2002 21:37:05 -0000 1.4 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: taint.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/taint.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** taint.pl 13 May 2002 17:26:07 -0000 1.1 --- taint.pl 18 Dec 2002 21:37:05 -0000 1.2 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib"; Index: validations.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/examples/validations.pl,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -r1.7 -r1.8 *** validations.pl 23 Jan 2002 21:31:46 -0000 1.7 --- validations.pl 18 Dec 2002 21:37:05 -0000 1.8 *************** *** 1,4 **** --- 1,9 ---- #!/usr/bin/perl -wT + # Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + use strict; use lib "../lib/"; |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick In directory sc8-pr-cvs1:/tmp/cvs-serv5801/lib/CGI/FormMagick Modified Files: Events.pm HTML.pm L10N.pm Setup.pm Utils.pm Validator.pm Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: Events.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Events.pm,v retrieving revision 1.11 retrieving revision 1.12 diff -C2 -r1.11 -r1.12 *** Events.pm 19 Feb 2002 17:54:18 -0000 1.11 --- Events.pm 18 Dec 2002 21:37:05 -0000 1.12 *************** *** 1,7 **** #!/usr/bin/perl -w # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # This software is distributed under the same licenses as Perl; see ! # the file COPYING for details. # --- 1,9 ---- #!/usr/bin/perl -w # + # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # Index: HTML.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/HTML.pm,v retrieving revision 1.64 retrieving revision 1.65 diff -C2 -r1.64 -r1.65 *** HTML.pm 24 Jun 2002 17:56:35 -0000 1.64 --- HTML.pm 18 Dec 2002 21:37:05 -0000 1.65 *************** *** 1,8 **** #!/usr/bin/perl -w # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. ! # # NOTE TO DEVELOPERS: Use "XXX" to mark bugs or areas that need work --- 1,9 ---- #!/usr/bin/perl -w # ! # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # NOTE TO DEVELOPERS: Use "XXX" to mark bugs or areas that need work Index: L10N.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/L10N.pm,v retrieving revision 1.38 retrieving revision 1.39 diff -C2 -r1.38 -r1.39 *** L10N.pm 18 Dec 2002 20:44:55 -0000 1.38 --- L10N.pm 18 Dec 2002 21:37:05 -0000 1.39 *************** *** 1,3 **** --- 1,9 ---- #!/usr/bin/perl -w + # + # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + package CGI::FormMagick; Index: Setup.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Setup.pm,v retrieving revision 1.22 retrieving revision 1.23 diff -C2 -r1.22 -r1.23 *** Setup.pm 25 Apr 2002 16:42:35 -0000 1.22 --- Setup.pm 18 Dec 2002 21:37:05 -0000 1.23 *************** *** 1,7 **** #!/usr/bin/perl -w # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # This software is distributed under the same licenses as Perl; see ! # the file COPYING for details. # --- 1,9 ---- #!/usr/bin/perl -w # + # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # Index: Utils.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Utils.pm,v retrieving revision 1.30 retrieving revision 1.31 diff -C2 -r1.30 -r1.31 *** Utils.pm 13 May 2002 18:13:02 -0000 1.30 --- Utils.pm 18 Dec 2002 21:37:05 -0000 1.31 *************** *** 1,7 **** #!/usr/bin/perl -w # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # This software is distributed under the same licenses as Perl; see ! # the file COPYING for details. # --- 1,9 ---- #!/usr/bin/perl -w # + # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # Index: Validator.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator.pm,v retrieving revision 1.46 retrieving revision 1.47 diff -C2 -r1.46 -r1.47 *** Validator.pm 24 Jun 2002 18:22:06 -0000 1.46 --- Validator.pm 18 Dec 2002 21:37:05 -0000 1.47 *************** *** 2,8 **** # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 2,10 ---- # ! # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator In directory sc8-pr-cvs1:/tmp/cvs-serv5801/lib/CGI/FormMagick/Validator Modified Files: Basic.pm Business.pm Geography.pm Length.pm Network.pm Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: Basic.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Basic.pm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -r1.6 -r1.7 *** Basic.pm 5 Feb 2002 22:09:04 -0000 1.6 --- Basic.pm 18 Dec 2002 21:37:06 -0000 1.7 *************** *** 2,8 **** # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 2,10 ---- # ! # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ Index: Business.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Business.pm,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -r1.8 -r1.9 *** Business.pm 5 Feb 2002 22:09:04 -0000 1.8 --- Business.pm 18 Dec 2002 21:37:06 -0000 1.9 *************** *** 2,8 **** # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 2,10 ---- # ! # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ Index: Geography.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Geography.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -r1.2 -r1.3 *** Geography.pm 5 Feb 2002 22:09:04 -0000 1.2 --- Geography.pm 18 Dec 2002 21:37:06 -0000 1.3 *************** *** 1,8 **** #!/usr/bin/perl -w - # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 1,8 ---- #!/usr/bin/perl -w # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ Index: Length.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Length.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -r1.4 -r1.5 *** Length.pm 5 Feb 2002 22:09:04 -0000 1.4 --- Length.pm 18 Dec 2002 21:37:06 -0000 1.5 *************** *** 2,8 **** # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 2,10 ---- # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. ! # # $Id$ Index: Network.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Network.pm,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -r1.10 -r1.11 *** Network.pm 18 Dec 2002 20:44:55 -0000 1.10 --- Network.pm 18 Dec 2002 21:37:06 -0000 1.11 *************** *** 2,8 **** # ! # FormMagick (c) 2000 Kirrily Robert <sk...@in...> ! # This software is distributed under the GNU General Public License; see ! # the file COPYING for details. # # $Id$ --- 2,9 ---- # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick/lib/CGI In directory sc8-pr-cvs1:/tmp/cvs-serv5801/lib/CGI Modified Files: FormMagick.pm Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: FormMagick.pm =================================================================== RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v retrieving revision 1.126 retrieving revision 1.127 diff -C2 -r1.126 -r1.127 *** FormMagick.pm 18 Dec 2002 20:44:54 -0000 1.126 --- FormMagick.pm 18 Dec 2002 21:37:05 -0000 1.127 *************** *** 1,6 **** ! #!/usr/bin/perl -w # # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # This software is distributed under the same licenses as Perl; see ! # the file COPYING for details. ! # # $Id$ --- 1,8 ---- ! #!/usr/bin/perl -w ! # ! # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> ! # Copyright (c) 2000-2002 Mitel Networks Corporation ! # This software is distributed under the same licenses as Perl itself; ! # see the file COPYING for details. # # $Id$ |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick In directory sc8-pr-cvs1:/tmp/cvs-serv5801 Modified Files: COPYING FormMagick.dtd README Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: COPYING =================================================================== RCS file: /cvsroot/formmagick/formmagick/COPYING,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -r1.1.1.1 -r1.2 *** COPYING 4 Nov 2000 15:17:11 -0000 1.1.1.1 --- COPYING 18 Dec 2002 21:37:05 -0000 1.2 *************** *** 339,340 **** --- 339,471 ---- library. If this is what you want to do, use the GNU Library General Public License instead of this License. + + + + + The "Artistic License" + + Preamble + + The intent of this document is to state the conditions under which a + Package may be copied, such that the Copyright Holder maintains some + semblance of artistic control over the development of the package, + while giving the users of the package the right to use and distribute + the Package in a more-or-less customary fashion, plus the right to make + reasonable modifications. + + Definitions: + + "Package" refers to the collection of files distributed by the + Copyright Holder, and derivatives of that collection of files + created through textual modification. + + "Standard Version" refers to such a Package if it has not been + modified, or has been modified in accordance with the wishes + of the Copyright Holder as specified below. + + "Copyright Holder" is whoever is named in the copyright or + copyrights for the package. + + "You" is you, if you're thinking about copying or distributing + this Package. + + "Reasonable copying fee" is whatever you can justify on the + basis of media cost, duplication charges, time of people involved, + and so on. (You will not be required to justify it to the + Copyright Holder, but only to the computing community at large + as a market that must bear the fee.) + + "Freely Available" means that no fee is charged for the item + itself, though there may be fees involved in handling the item. + It also means that recipients of the item may redistribute it + under the same conditions they received it. + + 1. You may make and give away verbatim copies of the source form of the + Standard Version of this Package without restriction, provided that you + duplicate all of the original copyright notices and associated disclaimers. + + 2. You may apply bug fixes, portability fixes and other modifications + derived from the Public Domain or from the Copyright Holder. A Package + modified in such a way shall still be considered the Standard Version. + + 3. You may otherwise modify your copy of this Package in any way, provided + that you insert a prominent notice in each changed file stating how and + when you changed that file, and provided that you do at least ONE of the + following: + + a) place your modifications in the Public Domain or otherwise make them + Freely Available, such as by posting said modifications to Usenet or + an equivalent medium, or placing the modifications on a major archive + site such as uunet.uu.net, or by allowing the Copyright Holder to include + your modifications in the Standard Version of the Package. + + b) use the modified Package only within your corporation or organization. + + c) rename any non-standard executables so the names do not conflict + with standard executables, which must also be provided, and provide + a separate manual page for each non-standard executable that clearly + documents how it differs from the Standard Version. + + d) make other distribution arrangements with the Copyright Holder. + + 4. You may distribute the programs of this Package in object code or + executable form, provided that you do at least ONE of the following: + + a) distribute a Standard Version of the executables and library files, + together with instructions (in the manual page or equivalent) on where + to get the Standard Version. + + b) accompany the distribution with the machine-readable source of + the Package with your modifications. + + c) give non-standard executables non-standard names, and clearly + document the differences in manual pages (or equivalent), together + with instructions on where to get the Standard Version. + + d) make other distribution arrangements with the Copyright Holder. + + 5. You may charge a reasonable copying fee for any distribution of this + Package. You may charge any fee you choose for support of this + Package. You may not charge a fee for this Package itself. However, + you may distribute this Package in aggregate with other (possibly + commercial) programs as part of a larger (possibly commercial) software + distribution provided that you do not advertise this Package as a + product of your own. You may embed this Package's interpreter within + an executable of yours (by linking); this shall be construed as a mere + form of aggregation, provided that the complete Standard Version of the + interpreter is so embedded. + + 6. The scripts and library files supplied as input to or produced as + output from the programs of this Package do not automatically fall + under the copyright of this Package, but belong to whoever generated + them, and may be sold commercially, and may be aggregated with this + Package. If such scripts or library files are aggregated with this + Package via the so-called "undump" or "unexec" methods of producing a + binary executable image, then distribution of such an image shall + neither be construed as a distribution of this Package nor shall it + fall under the restrictions of Paragraphs 3 and 4, provided that you do + not represent such an executable image as a Standard Version of this + Package. + + 7. C subroutines (or comparably compiled subroutines in other + languages) supplied by you and linked into this Package in order to + emulate subroutines and variables of the language defined by this + Package shall not be considered part of this Package, but are the + equivalent of input as in Paragraph 6, provided these subroutines do + not change the language in any way that would cause it to fail the + regression tests for the language. + + 8. Aggregation of this Package with a commercial distribution is always + permitted provided that the use of this Package is embedded; that is, + when no overt attempt is made to make this Package's interfaces visible + to the end user of the commercial distribution. Such use shall not be + construed as a distribution of this Package. + + 9. The name of the Copyright Holder may not be used to endorse or promote + products derived from this software without specific prior written permission. + + 10. THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR + IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED + WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. + + The End Index: FormMagick.dtd =================================================================== RCS file: /cvsroot/formmagick/formmagick/FormMagick.dtd,v retrieving revision 1.11 retrieving revision 1.12 diff -C2 -r1.11 -r1.12 *** FormMagick.dtd 23 Jan 2002 22:57:36 -0000 1.11 --- FormMagick.dtd 18 Dec 2002 21:37:05 -0000 1.12 *************** *** 4,7 **** --- 4,12 ---- Kirrily "Skud" Robert (sk...@in...) + Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> + Copyright (c) 2000-2002 Mitel Networks Corporation + This software is distributed under the same licenses as Perl itself; + see the file COPYING for details. + --> Index: README =================================================================== RCS file: /cvsroot/formmagick/formmagick/README,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -r1.6 -r1.7 *** README 2 Mar 2001 18:18:09 -0000 1.6 --- README 18 Dec 2002 21:37:05 -0000 1.7 *************** *** 1,7 **** FormMagick 0.3.1 ! Copyright (c) 2000-2001 Kirrily "Skud" Robert <sk...@in...> ! ! This software is distributed under the GNU General Public License (GPL), ! a copy of which can be found in the file COPYING in this directory. For installation instructions, read the file INSTALL. --- 1,7 ---- FormMagick 0.3.1 ! Copyright (c) 2000-2001 Kirrily Robert <sk...@cp...> ! Copyright (c) 2000-2002 Mitel Networks Corporation ! This software is distributed under the same licenses as Perl itself; ! see the file COPYING for details. For installation instructions, read the file INSTALL. |
|
From: Mark K. <seg...@us...> - 2002-12-18 21:37:11
|
Update of /cvsroot/formmagick/formmagick/tools In directory sc8-pr-cvs1:/tmp/cvs-serv5801/tools Modified Files: extract-phrases.pl mergetrans.pl Log Message: Updated copyright headers and license terms in all source files (and some others), and added Artistic license text in COPYING. Index: extract-phrases.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/tools/extract-phrases.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** extract-phrases.pl 2 Mar 2001 18:18:09 -0000 1.1 --- extract-phrases.pl 18 Dec 2002 21:37:06 -0000 1.2 *************** *** 1,4 **** --- 1,11 ---- #!/usr/local/bin/perl + # + # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. + + use strict; use XML::Parser; Index: mergetrans.pl =================================================================== RCS file: /cvsroot/formmagick/formmagick/tools/mergetrans.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** mergetrans.pl 2 Mar 2001 18:18:09 -0000 1.1 --- mergetrans.pl 18 Dec 2002 21:37:06 -0000 1.2 *************** *** 1,3 **** --- 1,8 ---- #!/usr/bin/perl -w + # + # FormMagick (c) 2000-2001 Kirrily Robert <sk...@cp...> + # Copyright (c) 2000-2002 Mitel Networks Corporation + # This software is distributed under the same licenses as Perl itself; + # see the file COPYING for details. open (A, $ARGV[0]) or die "Couldn't open $ARGV[0]: $!"; |
|
From: Mark K. <seg...@us...> - 2002-12-18 20:44:59
|
Update of /cvsroot/formmagick/formmagick/lib/Persistence/Object In directory sc8-pr-cvs1:/tmp/cvs-serv20830/lib/Persistence/Object Removed Files: Simple.pm Log Message: Merged changes from branch MITEL-0_87. This includes a small patch to trim blank space from XML lexicon entries and parsing of email addresses per RFC822. --- Simple.pm DELETED --- |
|
From: Mark K. <seg...@us...> - 2002-12-18 20:44:59
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick
In directory sc8-pr-cvs1:/tmp/cvs-serv20830/lib/CGI/FormMagick
Modified Files:
L10N.pm
Log Message:
Merged changes from branch MITEL-0_87. This includes a small patch to trim blank space from XML lexicon entries and parsing of email addresses per RFC822.
Index: L10N.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/L10N.pm,v
retrieving revision 1.37
retrieving revision 1.38
diff -C2 -r1.37 -r1.38
*** L10N.pm 21 May 2002 18:32:11 -0000 1.37
--- L10N.pm 18 Dec 2002 20:44:55 -0000 1.38
***************
*** 347,350 ****
--- 347,352 ----
$trans = $e->{content}->[8]->[2];
if ($base && $trans) {
+ $trans =~ s/^\s*//; # Remove leading whitespace
+ $trans =~ s/\s*$//; # Remove trailing space
$return_lexicon{$base} = ($iconv
? $iconv->convert($trans)
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:44:59
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator
In directory sc8-pr-cvs1:/tmp/cvs-serv20830/lib/CGI/FormMagick/Validator
Modified Files:
Network.pm
Log Message:
Merged changes from branch MITEL-0_87. This includes a small patch to trim blank space from XML lexicon entries and parsing of email addresses per RFC822.
Index: Network.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Network.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** Network.pm 24 Jun 2002 17:55:14 -0000 1.9
--- Network.pm 18 Dec 2002 20:44:55 -0000 1.10
***************
*** 11,14 ****
--- 11,15 ----
package CGI::FormMagick::Validator;
use strict;
+ use Mail::RFC822::Address;
=pod
***************
*** 87,94 ****
if (not defined $data ) {
return "You must enter an email address.";
! } elsif ($data =~ /.+\@.+\..+/) {
return "OK";
} else {
! return "This field doesn't look like an email address - it should contain an at-sign (\@)";
}
}
--- 88,95 ----
if (not defined $data ) {
return "You must enter an email address.";
! } elsif (Mail::RFC822::Address::valid($data)) {
return "OK";
} else {
! return "This field doesn't look like an RFC822-compliant email address";
}
}
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:44:58
|
Update of /cvsroot/formmagick/formmagick/lib/CGI
In directory sc8-pr-cvs1:/tmp/cvs-serv20830/lib/CGI
Modified Files:
FormMagick.pm
Removed Files:
Persistent.pm
Log Message:
Merged changes from branch MITEL-0_87. This includes a small patch to trim blank space from XML lexicon entries and parsing of email addresses per RFC822.
Index: FormMagick.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v
retrieving revision 1.125
retrieving revision 1.126
diff -C2 -r1.125 -r1.126
*** FormMagick.pm 24 Jun 2002 18:12:20 -0000 1.125
--- FormMagick.pm 18 Dec 2002 20:44:54 -0000 1.126
***************
*** 9,13 ****
package CGI::FormMagick;
! my $VERSION = $VERSION = "0.86";
use XML::Parser;
--- 9,13 ----
package CGI::FormMagick;
! my $VERSION = $VERSION = "0.87";
use XML::Parser;
***************
*** 175,179 ****
$self->{calling_package} = (caller)[0];
$self->{fallback_language} = undef;
!
return $self;
}
--- 175,179 ----
$self->{calling_package} = (caller)[0];
$self->{fallback_language} = undef;
!
return $self;
}
***************
*** 348,352 ****
print $self->{cgi}->header;
-
# debug thingy, to check L10N lexicons, only if you need it
$self->check_l10n() if $self->{cgi}->param('checkl10n');
--- 348,351 ----
***************
*** 391,395 ****
$self->print_page();
}
-
$self->print_form_footer();
$self->clear_navigation_params();
--- 390,393 ----
***************
*** 949,953 ****
my $cgi = $fm->{cgi};
! my $fn = $cgi->param('.id');
my $po = new Persistence::Object::Simple __Fn => $fn;
--- 947,951 ----
my $cgi = $fm->{cgi};
! my $fn = join "/", ($fm->{sessiondir},$cgi->param('.id'));
my $po = new Persistence::Object::Simple __Fn => $fn;
--- Persistent.pm DELETED ---
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:44:58
|
Update of /cvsroot/formmagick/formmagick In directory sc8-pr-cvs1:/tmp/cvs-serv20830 Modified Files: Changes Log Message: Merged changes from branch MITEL-0_87. This includes a small patch to trim blank space from XML lexicon entries and parsing of email addresses per RFC822. Index: Changes =================================================================== RCS file: /cvsroot/formmagick/formmagick/Changes,v retrieving revision 1.33 retrieving revision 1.34 diff -C2 -r1.33 -r1.34 *** Changes 24 Jun 2002 18:12:20 -0000 1.33 --- Changes 18 Dec 2002 20:44:54 -0000 1.34 *************** *** 1,4 **** --- 1,9 ---- Revision history for Perl extension FormMagick. + 0.87 + ---- + An HTML error (missing > symbol) was making the script print only the + first error message if a field was failing more than one validation. + 0.86 ---- |
|
From: Mark K. <seg...@us...> - 2002-12-18 20:13:17
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator
In directory sc8-pr-cvs1:/tmp/cvs-serv10202/lib/CGI/FormMagick/Validator
Modified Files:
Tag: MITEL-0_87
Network.pm
Log Message:
Sync CVS repository with Mitel changes to date. Remove Persistence::Object::Simple and CGI::Persistent from the repository. use RFC822 to parse email addresses in Network validator. Trim blanks from XML lexicon entries. Updated changelog.
Index: Network.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/Validator/Network.pm,v
retrieving revision 1.9
retrieving revision 1.9.2.1
diff -C2 -r1.9 -r1.9.2.1
*** Network.pm 24 Jun 2002 17:55:14 -0000 1.9
--- Network.pm 18 Dec 2002 20:13:13 -0000 1.9.2.1
***************
*** 11,14 ****
--- 11,15 ----
package CGI::FormMagick::Validator;
use strict;
+ use Mail::RFC822::Address;
=pod
***************
*** 87,94 ****
if (not defined $data ) {
return "You must enter an email address.";
! } elsif ($data =~ /.+\@.+\..+/) {
return "OK";
} else {
! return "This field doesn't look like an email address - it should contain an at-sign (\@)";
}
}
--- 88,95 ----
if (not defined $data ) {
return "You must enter an email address.";
! } elsif (Mail::RFC822::Address::valid($data)) {
return "OK";
} else {
! return "This field doesn't look like an RFC822-compliant email address";
}
}
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:13:17
|
Update of /cvsroot/formmagick/formmagick
In directory sc8-pr-cvs1:/tmp/cvs-serv10202
Modified Files:
Tag: MITEL-0_87
Changes
Log Message:
Sync CVS repository with Mitel changes to date. Remove Persistence::Object::Simple and CGI::Persistent from the repository. use RFC822 to parse email addresses in Network validator. Trim blanks from XML lexicon entries. Updated changelog.
Index: Changes
===================================================================
RCS file: /cvsroot/formmagick/formmagick/Changes,v
retrieving revision 1.33
retrieving revision 1.33.2.1
diff -C2 -r1.33 -r1.33.2.1
*** Changes 24 Jun 2002 18:12:20 -0000 1.33
--- Changes 18 Dec 2002 20:13:13 -0000 1.33.2.1
***************
*** 1,4 ****
--- 1,9 ----
Revision history for Perl extension FormMagick.
+ 0.87
+ ----
+ An HTML error (missing > symbol) was making the script print only the
+ first error message if a field was failing more than one validation.
+
0.86
----
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:13:17
|
Update of /cvsroot/formmagick/formmagick/lib/Persistence/Object
In directory sc8-pr-cvs1:/tmp/cvs-serv10202/lib/Persistence/Object
Removed Files:
Tag: MITEL-0_87
Simple.pm
Log Message:
Sync CVS repository with Mitel changes to date. Remove Persistence::Object::Simple and CGI::Persistent from the repository. use RFC822 to parse email addresses in Network validator. Trim blanks from XML lexicon entries. Updated changelog.
--- Simple.pm DELETED ---
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:13:17
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick
In directory sc8-pr-cvs1:/tmp/cvs-serv10202/lib/CGI/FormMagick
Modified Files:
Tag: MITEL-0_87
L10N.pm
Log Message:
Sync CVS repository with Mitel changes to date. Remove Persistence::Object::Simple and CGI::Persistent from the repository. use RFC822 to parse email addresses in Network validator. Trim blanks from XML lexicon entries. Updated changelog.
Index: L10N.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/L10N.pm,v
retrieving revision 1.37.2.1
retrieving revision 1.37.2.2
diff -C2 -r1.37.2.1 -r1.37.2.2
*** L10N.pm 26 Sep 2002 17:46:25 -0000 1.37.2.1
--- L10N.pm 18 Dec 2002 20:13:13 -0000 1.37.2.2
***************
*** 347,352 ****
$trans = $e->{content}->[8]->[2];
if ($base && $trans) {
! $trans =~ /^\s*([\s\S]+\S+)\s*$/; #strip leading/trailing blanks
! $trans = $1;
$return_lexicon{$base} = ($iconv
? $iconv->convert($trans)
--- 347,352 ----
$trans = $e->{content}->[8]->[2];
if ($base && $trans) {
! $trans =~ s/^\s*//; # Remove leading whitespace
! $trans =~ s/\s*$//; # Remove trailing space
$return_lexicon{$base} = ($iconv
? $iconv->convert($trans)
|
|
From: Mark K. <seg...@us...> - 2002-12-18 20:13:17
|
Update of /cvsroot/formmagick/formmagick/lib/CGI
In directory sc8-pr-cvs1:/tmp/cvs-serv10202/lib/CGI
Modified Files:
Tag: MITEL-0_87
FormMagick.pm
Removed Files:
Tag: MITEL-0_87
Persistent.pm
Log Message:
Sync CVS repository with Mitel changes to date. Remove Persistence::Object::Simple and CGI::Persistent from the repository. use RFC822 to parse email addresses in Network validator. Trim blanks from XML lexicon entries. Updated changelog.
Index: FormMagick.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v
retrieving revision 1.125.2.1
retrieving revision 1.125.2.2
diff -C2 -r1.125.2.1 -r1.125.2.2
*** FormMagick.pm 26 Sep 2002 17:46:24 -0000 1.125.2.1
--- FormMagick.pm 18 Dec 2002 20:13:13 -0000 1.125.2.2
***************
*** 9,13 ****
package CGI::FormMagick;
! my $VERSION = $VERSION = "0.86";
use XML::Parser;
--- 9,13 ----
package CGI::FormMagick;
! my $VERSION = $VERSION = "0.87";
use XML::Parser;
***************
*** 175,179 ****
$self->{calling_package} = (caller)[0];
$self->{fallback_language} = undef;
!
return $self;
}
--- 175,179 ----
$self->{calling_package} = (caller)[0];
$self->{fallback_language} = undef;
!
return $self;
}
***************
*** 348,352 ****
print $self->{cgi}->header;
-
# debug thingy, to check L10N lexicons, only if you need it
$self->check_l10n() if $self->{cgi}->param('checkl10n');
--- 348,351 ----
***************
*** 391,395 ****
$self->print_page();
}
-
$self->print_form_footer();
$self->clear_navigation_params();
--- 390,393 ----
--- Persistent.pm DELETED ---
|
|
From: Mark K. <seg...@us...> - 2002-09-26 17:48:39
|
Update of /cvsroot/formmagick/formmagick/lib/CGI
In directory usw-pr-cvs1:/tmp/cvs-serv9196/lib/CGI
Modified Files:
Tag: MITEL-0_87
Persistent.pm
Log Message:
The patched CGI::Persistent required for the previous fixes
Index: Persistent.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/Persistent.pm,v
retrieving revision 1.2.2.1
retrieving revision 1.2.2.2
diff -C2 -r1.2.2.1 -r1.2.2.2
*** Persistent.pm 26 Sep 2002 17:46:24 -0000 1.2.2.1
--- Persistent.pm 26 Sep 2002 17:48:34 -0000 1.2.2.2
***************
*** 11,18 ****
package CGI::Persistent;
! use CGI;
use Persistence::Object::Simple;
use vars qw(@ISA $VERSION);
use Data::Dumper;
@ISA = qw( CGI ); ( $VERSION ) = '$Revision$' =~ /(\d+\.\d+)/;
--- 11,19 ----
package CGI::Persistent;
! use CGI '-no_xhtml';
use Persistence::Object::Simple;
use vars qw(@ISA $VERSION);
use Data::Dumper;
+ use File::Basename;
@ISA = qw( CGI ); ( $VERSION ) = '$Revision$' =~ /(\d+\.\d+)/;
***************
*** 22,35 ****
$dope = "." unless $dope;
my $cgi = new CGI; # print $cgi->header ();
! my $fn = $cgi->param( '.id' ) || $id;
unless ( $fn ) {
my $po = new Persistence::Object::Simple ( __Dope => $dope );
! $cgi->append( -name => '.id', -values => $po->{ __Fn } );
! $fn = $po->{ __Fn }; undef $po;
}
! my $po = new Persistence::Object::Simple __Fn => $fn;
$po->{ __DOPE } = undef;
my @names = $cgi->param ();
--- 23,38 ----
$dope = "." unless $dope;
my $cgi = new CGI; # print $cgi->header ();
! my $fn = basename($cgi->param( '.id' ) || $id);
unless ( $fn ) {
my $po = new Persistence::Object::Simple ( __Dope => $dope );
! $cgi->append( -name => '.id', -values => basename $po->{ __Fn } );
! $fn = basename $po->{ __Fn }; undef $po;
}
! my $po = new Persistence::Object::Simple __Fn =>
! join "/", ($dope,$fn);
$po->{ __DOPE } = undef;
+ $po->{sessiondir} = $dope;
my @names = $cgi->param ();
***************
*** 41,47 ****
foreach $key ( keys %$po ) {
$cgi->param( -name => $key, -values => $po->{$key} )
! unless ( grep /$key/, @names ) || $key eq "__Fn"
}
$po->commit ();
return bless $cgi, $class;
--- 44,52 ----
foreach $key ( keys %$po ) {
$cgi->param( -name => $key, -values => $po->{$key} )
! unless ( grep /$key/, @names ) || $key eq "__Fn";
}
+ $cgi->{sessiondir} = $po->{sessiondir};
+
$po->commit ();
return bless $cgi, $class;
***************
*** 113,132 ****
print $cgi->header ();
my $url = $cgi->state_url ();
! print "<a href=$u>I am a persistent CGI session.</a>";
=head1 SOLUTION TO THE STATELESS PROBLEM
! HTTP is a stateless protocol; a HTTP server closes connection after serving
! an object. It retains no memory of the request details and doesn't relate
! subsequent requests with what it has already served. While this works well
! for static resources like HTML pages and image elements, complex user
! interactions often require state preservation across multiple requests and
! different parts of the web resource. Statefulness on a stateless server
! is achieved either through client-side mechanisms like Netscape cookies
! (which are considered distasteful on general principles of privacy) or with
! hidden fields in forms and value-attribute pairs in the URLs. State
! preserving URLs are more desirable, because they are independent of the
! client configuration, but tend to get unwieldy with increase in space
! complexity of the application.
CGI::Persistent solves this problem by introducing persistent CGI sessions
--- 118,136 ----
print $cgi->header ();
my $url = $cgi->state_url ();
! print "<a href=$url>I am a persistent CGI session.</a>";
=head1 SOLUTION TO THE STATELESS PROBLEM
! HTTP is a stateless protocol; a HTTP server closes connection after
! serving an object. It retains no memory of the request details and doesn't
! relate subsequent requests with what it has already served. While this
! works well for static resources like HTML pages and image elements,
! complex user interactions often require state preservation across multiple
! requests and different parts of the web resource. Statefulness on a
! stateless server is achieved either through client-side mechanisms like
! Netscape cookies or with hidden fields in forms and value-attribute pairs
! in the URLs. State preserving URLs are more desirable, because they are
! independent of the client configuration, but tend to get unwieldy with
! increase in space complexity of the application.
CGI::Persistent solves this problem by introducing persistent CGI sessions
***************
*** 147,156 ****
=item B<new()>
! Creates a new CGI object and binds it to its associated persistent state. A
! new state image is created if no associated state exists. new() takes two
! optional arguments. The first argument is the directory of persistence, the
! place where state information is stored. Ideally, this should be a separate
! directory dedicated to state files. When a directory is not specified, the
! current working directory is assumed.
new() can also take a state id on the argument list instead of getting it
--- 151,160 ----
=item B<new()>
! Creates a new CGI object and binds it to its associated persistent state.
! A new state image is created if no associated state exists. new() takes
! two optional arguments. The first argument is the directory of
! persistence, the place where state information is stored. Ideally, this
! should be a separate directory dedicated to state files. When a directory
! is not specified, the current working directory is assumed.
new() can also take a state id on the argument list instead of getting it
***************
*** 161,166 ****
$q = new CGI::Persistent;
! $q = new CGI::Persistent "/dope";
! $q = new CGI::Persistent undef, "/dope/924910985.134";
=item B<state_url()>
--- 165,170 ----
$q = new CGI::Persistent;
! $q = new CGI::Persistent "/sessions";
! $q = new CGI::Persistent undef, "/sessions/924910985.134";
=item B<state_url()>
|
|
From: Mark K. <seg...@us...> - 2002-09-26 17:46:29
|
Update of /cvsroot/formmagick/formmagick/lib/CGI
In directory usw-pr-cvs1:/tmp/cvs-serv8475/lib/CGI
Modified Files:
Tag: MITEL-0_87
FormMagick.pm Persistent.pm
Log Message:
Two patches against 0.87: one security fix that also requires a patched CGI::Persistent (the main culprit), and code to trim leading and trailing whitespace from lexicon entries.
Index: FormMagick.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v
retrieving revision 1.125
retrieving revision 1.125.2.1
diff -C2 -r1.125 -r1.125.2.1
*** FormMagick.pm 24 Jun 2002 18:12:20 -0000 1.125
--- FormMagick.pm 26 Sep 2002 17:46:24 -0000 1.125.2.1
***************
*** 949,953 ****
my $cgi = $fm->{cgi};
! my $fn = $cgi->param('.id');
my $po = new Persistence::Object::Simple __Fn => $fn;
--- 949,953 ----
my $cgi = $fm->{cgi};
! my $fn = join "/", ($fm->{sessiondir},$cgi->param('.id'));
my $po = new Persistence::Object::Simple __Fn => $fn;
Index: Persistent.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/Persistent.pm,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -C2 -r1.2 -r1.2.2.1
*** Persistent.pm 21 Jan 2002 19:51:08 -0000 1.2
--- Persistent.pm 26 Sep 2002 17:46:24 -0000 1.2.2.1
***************
*** 52,56 ****
my ( $self, $param ) = @_;
! my $fn = $self->param( '.id' );
my $po = new Persistence::Object::Simple __Fn => $fn;
delete $po->{ $param }; $po->commit ();
--- 52,56 ----
my ( $self, $param ) = @_;
! my $fn = join "/", ($self->{sessiondir},$self->param( '.id' ));
my $po = new Persistence::Object::Simple __Fn => $fn;
delete $po->{ $param }; $po->commit ();
***************
*** 62,66 ****
my ( $self ) = shift;
! $fn = $self->param( '.id' );
my $po = new Persistence::Object::Simple __Fn => $fn;
$po->expire;
--- 62,66 ----
my ( $self ) = shift;
! $fn = join "/", ($self->{sessiondir},$self->param( '.id' ));
my $po = new Persistence::Object::Simple __Fn => $fn;
$po->expire;
***************
*** 100,104 ****
}
! "True Value";
=head1 NAME
--- 100,104 ----
}
! 1;
=head1 NAME
|
|
From: Mark K. <seg...@us...> - 2002-09-26 17:46:29
|
Update of /cvsroot/formmagick/formmagick/lib/CGI/FormMagick
In directory usw-pr-cvs1:/tmp/cvs-serv8475/lib/CGI/FormMagick
Modified Files:
Tag: MITEL-0_87
L10N.pm
Log Message:
Two patches against 0.87: one security fix that also requires a patched CGI::Persistent (the main culprit), and code to trim leading and trailing whitespace from lexicon entries.
Index: L10N.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick/L10N.pm,v
retrieving revision 1.37
retrieving revision 1.37.2.1
diff -C2 -r1.37 -r1.37.2.1
*** L10N.pm 21 May 2002 18:32:11 -0000 1.37
--- L10N.pm 26 Sep 2002 17:46:25 -0000 1.37.2.1
***************
*** 347,350 ****
--- 347,352 ----
$trans = $e->{content}->[8]->[2];
if ($base && $trans) {
+ $trans =~ /^\s*([\s\S]+\S+)\s*$/; #strip leading/trailing blanks
+ $trans = $1;
$return_lexicon{$base} = ($iconv
? $iconv->convert($trans)
|
4 messages has been excluded from this view by a project administrator.
