<?xml version="1.0" encoding="UTF-8"?>
<test id="wmlscriptlib/lang/charset/1" class="A" scope="wmlscriptlib" testtype="application" type="manual" source="wmlssl12#7.15" device="both">
  <assertion>When the Lang.characterSet function is called,
it returns an IANA-assigned integer representing the character set supported
by the WMLScript Interpreter.
</assertion>
  <results>
    <result>
      <name>test</name>
      <value>pass</value>
    </result>
    <result>
      <name>cset</name>
      <value>.*</value>
    </result>
    <result>
      <name>eval</name>
      <value>.*</value>
    </result>
  </results>
  <method>
    <![CDATA[<card newcontext="true" id="main">
<p>What is the IANA-assigned integer identifier of the character set supported
in this browser?
<input name="cset"/>
</p>
<p>Select this&nbsp;<a href="#card1">link</a>&nbsp;to complete the test.</p>
<auto_failed>
</card>]]>
  </method>
  <cards>
    <card id="1">
      <![CDATA[<card id="card1">
<onevent type="onenterforward">
<go href="<script1>#main('$(cset:noesc)','test','card2')"/>
</onevent>
<auto_failed>
</card>
]]>
    </card>
    <card id="2">
      <![CDATA[<card id="card2">
<onevent type="onenterforward">
<go href="<resulturl>">
<postfield name="test" value="$test"/>
<postfield name="eval" value="$tmpval"/>
<postfield name="cset" value="$cset"/>
<sessionvars>
</go>
</onevent>
<auto_failed>
</card>
]]>
    </card>
  </cards>
  <scripts>
    <script id="1">
      <![CDATA[extern function main(cset,myvar,next) {
	var result = 'fail';
	var tmp = Lang.characterSet();

	if (tmp == cset) {
		result = 'pass';
	}
	WMLBrowser.setVar(myvar, result);
	WMLBrowser.setVar('tmpval', tmp);
	WMLBrowser.go('#' + next);
	return 1;
}
]]>
    </script>
  </scripts>
</test>

