Annotation of parser3/tests/247.html, revision 1.1
1.1 ! misha 1: @main[]
! 2: # checking for UTF-8 auto detection (BOM code)
! 3: ^1251[]
! 4: $response:content-type[
! 5: $.value[text/html]
! 6: $.charset[$response:charset]
! 7: ]
! 8:
! 9: ^load[file in UTF-8 with BOM. charset isn't specified;247_utf8_bom.txt]
! 10: ^load[file in UTF-8 with BOM. UTF-8 charset is specified;247_utf8_bom.txt;UTF-8]
! 11: #^load[247_utf8.txt]
! 12: ^load[file in UTF-8 w/o BOM. UTF-8 charset is specified;247_utf8.txt;UTF-8]
! 13: ^load[file in WINDOWS-1251. WINDOWS-1251 charset is specified;247_windows1251.txt;WINDOWS-1251]
! 14:
! 15: @load[sTitle;sFile;sCharset][f]
! 16: <h3>$sTitle</h3>
! 17: $f[^file::load[text;$sFile;
! 18: ^if(def $sCharset){
! 19: $.charset[$sCharset]
! 20: }
! 21: ]]
! 22:
! 23: $f.text<br />
E-mail: