From 7c9349e23f337e818c7f6fb922a54360515ac0d2 Mon Sep 17 00:00:00 2001
From: Christian Schneider
Date: Fri, 23 Nov 2007 13:08:17 +0000
Subject: Only split selected options on comma for multi-select

---
 tests/it_html.t | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'tests/it_html.t')

diff --git a/tests/it_html.t b/tests/it_html.t
index e87df48..b560ed1 100755
--- a/tests/it_html.t
+++ b/tests/it_html.t
@@ -38,6 +38,18 @@ is(
 	"link tag with data"
 );
 
+is(
+	it::replace('\n+\s*' => "", select('name' => "gna", 'multiple' => true, '1:foo,2:bar', '1,2')),
+	'<select name="gna" multiple><option value="1" selected>foo</option><option value="2" selected>bar</option></select>',
+	"select tag with multiselect",
+);
+
+is(
+	it::replace('\n+\s*' => "", select('name' => "gna", array("1" => "foo", "2" => 'bar', '1,2' => "qux"), '1,2')),
+	'<select name="gna"><option value="1">foo</option><option value="2">bar</option><option value="1,2" selected>qux</option></select>',
+	"link tag without multiselect",
+);
+
 # XML generation
 unset($GLOBALS['it_html']);
 new it_html(array('htmltype' => "xhtml", 'tags' => "xmltest"));
-- 
cgit v1.2.3