|
|
| version 1.76, 2004/12/23 15:36:12 | version 1.114, 2005/12/19 12:24:57 |
|---|---|
| Line 1 | Line 1 |
| ^connect[$SQL.connect-string]{ | |
| $f[^file::sql{select 2*2, 'this is name.doc', 'app/paf'}[ | |
| # $.name[that is name.zip] | |
| $.content-type[app/pif] | |
| ]] | |
| $f.name | |
| $f.content-type | |
| } | |
| @main[] | |
| ^try{ | |
| ^mustfail[] | |
| }{ | |
| ^if($exception.type eq xml){ | |
| failed, that's OK | |
| $exception.handled(1) | |
| } | |
| } | |
| @mustfail[] | |
| $dom_from_disk[^xdoc::create[input]] | |
| $dom_created_in_air[^xdoc::create[doc]] | |
| ^dom_created_in_air.documentElement.appendChild[$dom_from_disk.documentElement] | |
| ^show_xdoc2[$dom_created_in_air] | |
| @show_xdoc2[xdoc] | |
| <pre>^taint[html][^xdoc.string[ | |
| $.method[html] | |
| ]] | |
| </pre> |