|
|
| version 1.9, 2004/02/20 10:57:55 | version 1.73, 2004/12/23 14:40:54 |
|---|---|
| Line 1 | Line 1 |
| @main[] | |
| $request:charset[UTF-8] | |
| #$response:charset[UTF-8] | |
| $response:charset[windows-1251] | |
| $response:content-type[$.value[text/html]$.charset[$response:charset]] | |
| $xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?> | |
| <doc> | |
| исходный | |
| </doc> | |
| }] | |
| $xdoc[^xdoc.transform[_bug.xsl]] | |
| ^xdoc.string[] | |
| #^xdoc.save[_bug-koi.xml;$.encoding[koi8-r]] | |
| #^xdoc.save[_bug-in-request-charset.xml] | |
| <hr> | |
| $request:charset/$response:charset | |
| @main[] | |
| $cH[^cH[]] | |
| ^if($cH.this is "junction"){ | |
| $result[^cH.this[$cH.th_par]] | |
| }{ | |
| $result[0] | |
| } | |
| #################################################################################################################### | |
| @cH[] | |
| $result[ | |
| $.this[$mThis] | |
| $.th_par[ | |
| $.a(2) | |
| $.b(3) | |
| ] | |
| ] | |
| #################################################################################################################### | |
| @mThis[lparams][params] | |
| $params[^hash::create[$lparams]] | |
| $result[^eval($params.a * $params.b)] |