You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2004/10/04 07:37:16 UTC
cvs commit: embperl/test/html input.htm
richter 2004/10/03 22:37:16
Modified: . TODO
test/cmp input.htm
test/html input.htm
Log:
cleanup
Revision Changes Path
1.128 +0 -4 embperl/TODO
Index: TODO
===================================================================
RCS file: /home/cvs/embperl/TODO,v
retrieving revision 1.127
retrieving revision 1.128
diff -u -r1.127 -r1.128
--- TODO 4 Oct 2004 05:31:02 -0000 1.127
+++ TODO 4 Oct 2004 05:37:16 -0000 1.128
@@ -5,13 +5,9 @@
- textarea escape [Doug Rayner 6.5.04]
-- selectbox with empty array -> perlws Neu -> Verotrag ohne Votragarten
-
- doc that %mdat is per application
- check memory on recompile of epl files
-
-- flush before CLEANUP
SOLVED, need more TESTS:
1.19 +9 -5 embperl/test/cmp/input.htm
Index: input.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/input.htm,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -r1.18 -r1.19
--- input.htm 8 Jun 2003 13:14:28 -0000 1.18
+++ input.htm 4 Oct 2004 05:37:16 -0000 1.19
@@ -3,7 +3,7 @@
<title>Test for interpretation of input tag</title>
</head>
-<form action="inhalt.htm" method="POST">
+<form action="inhalt.htm" method="POST">
<p> </p>
<input name="neu1" value="no">
@@ -24,10 +24,10 @@
<input type="text">
<input type="text">
<input typo="text2">
- <input typo = "text2" >
+ <input typo = "text2">
<input foo>
<input foo >
-
+
<input name="neu2" value="">
<input name='neu3' value=">>">
@@ -67,6 +67,7 @@
<textarea name="feld1">text1</textarea>
<textarea name="feld5">text5</textarea>
+
<table border="0" width="100%">
<tr>
<td><table border="0">
@@ -99,7 +100,7 @@
</tr>
</table>
- <select name="foo">
+ <select name="foo">
<option value="feld1">feld1</option>
<option value="feld2">feld2</option>
<option value="feld3">feld3</option>
@@ -222,6 +223,7 @@
</select>
+
ks = Kategorie Region cb1 cb10 cb11 cb2 cb3 cb4 cb5 cb6 cb7 cb8 cb9 dec escmult feld1 feld2 feld3 feld4 feld5 feld5a feld5b feld6 feld7 feld8 foo mult neu1 neu2 neu3 undef<p>
<table border=9>
@@ -697,8 +699,10 @@
</tr>
</table>
+ <select name="empty"></select>
+
+
</form>
</body>
</html>
-
1.16 +6 -0 embperl/test/html/input.htm
Index: input.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/input.htm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- input.htm 15 Nov 2002 06:19:02 -0000 1.15
+++ input.htm 4 Oct 2004 05:37:16 -0000 1.16
@@ -393,6 +393,12 @@
</tr>
</table>
+ [- @empty = () -]
+ <select name="empty">
+ <option value="[+ $empty[$row] +]">[+ $empty[$row] +]</option>
+ </select>
+
+
</form>
</body>
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org