[interchange-cvs] interchange - heins modified lib/Vend/Form.pm

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Sun Aug 7 12:06:28 EDT 2005


User:      heins
Date:      2005-08-07 16:06:27 GMT
Modified:  lib/Vend Form.pm
Log:
* More XHTML patches thanks to Toni Mueller.

Revision  Changes    Path
2.62      +13 -13    interchange/lib/Vend/Form.pm


rev 2.62, prev_rev 2.61
Index: Form.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Form.pm,v
retrieving revision 2.61
retrieving revision 2.62
diff -u -r2.61 -r2.62
--- Form.pm	9 Jun 2005 18:15:28 -0000	2.61
+++ Form.pm	7 Aug 2005 16:06:27 -0000	2.62
@@ -1,6 +1,6 @@
 # Vend::Form - Generate Form widgets
 # 
-# $Id: Form.pm,v 2.61 2005/06/09 18:15:28 docelic Exp $
+# $Id: Form.pm,v 2.62 2005/08/07 16:06:27 mheins Exp $
 #
 # Copyright (C) 2002-2003 Interchange Development Group
 # Copyright (C) 1996-2002 Red Hat, Inc.
@@ -39,7 +39,7 @@
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = substr(q$Revision: 2.61 $, 10);
+$VERSION = substr(q$Revision: 2.62 $, 10);
 
 @EXPORT = qw (
 	display
@@ -75,9 +75,9 @@
 		.
 		qq({ROWS?} size="{ROWS}"{/ROWS?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
-		qq({MULTIPLE?} MULTIPLE{/MULTIPLE?})
+		qq({MULTIPLE?} multiple{/MULTIPLE?})
 		.
 		qq({EXTRA?} {EXTRA}{/EXTRA?})
 		.
@@ -95,7 +95,7 @@
 		.
 		qq({COLS?} cols="{COLS}"{/COLS?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
 		qq({MAXLENGTH?} maxlength="{MAXLENGTH}"{/MAXLENGTH?})
 		.
@@ -140,7 +140,7 @@
 		.
 		qq({EXTRA?} {EXTRA}{/EXTRA?})
 		.
-		qq(><br{XTRAILER}><textarea cols="{WIDTH}" rows="{HEIGHT}" NAME="{NAME}">{ENCODED}</textarea>{APPEND})
+		qq(><br{XTRAILER}><textarea cols="{WIDTH}" rows="{HEIGHT}" name="{NAME}">{ENCODED}</textarea>{APPEND})
 		,
 	text =>
 		qq({PREPEND}<input type="text" name="{NAME}" value="{ENCODED}")
@@ -149,7 +149,7 @@
 		.
 		qq({TTITLE?} title="{TTITLE}"{/TTITLE?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
 		qq({MAXLENGTH?} maxlength="{MAXLENGTH}"{/MAXLENGTH?})
 		.
@@ -180,9 +180,9 @@
 		.
 		qq({TTITLE?} title="{TTITLE}"{/TTITLE?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
-		qq({SELECTED?} CHECKED{/SELECTED?})
+		qq({SELECTED?} checked{/SELECTED?})
 		.
 		qq(>&nbsp;{TTITLE?}<span title="{TTITLE}">{/TTITLE?}{TLABEL}{TTITLE?}</span>{/TTITLE?})
 		,
@@ -193,9 +193,9 @@
 		.
 		qq({EXTRA?} {EXTRA}{/EXTRA?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
-		qq({SELECTED?} CHECKED{/SELECTED?})
+		qq({SELECTED?} checked{/SELECTED?})
 		.
 		qq(>&nbsp;{TTITLE?}<span title="{TTITLE}">{/TTITLE?}{TLABEL}{TTITLE?}</span>{/TTITLE?}&nbsp;&nbsp;)
 		,
@@ -215,11 +215,11 @@
 		.
 		qq({TTITLE?} title="{TTITLE}"{/TTITLE?})
 		.
-		qq({DISABLED?} DISABLED{/DISABLED?})
+		qq({DISABLED?} disabled{/DISABLED?})
 		.
 		qq({EXTRA?} {EXTRA}{/EXTRA?})
 		.
-		qq({SELECTED?} CHECKED{/SELECTED?})
+		qq({SELECTED?} checked{/SELECTED?})
 		.
 		qq(>)
 		.








More information about the interchange-cvs mailing list