Diff for /parser3/www/htdocs/Attic/_bug.html between versions 1.10 and 1.84.4.7

version 1.10, 2004/02/25 13:40:23 version 1.84.4.7, 2005/11/16 14:18:06
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 attribute="a  
          b">  
 исходный  
 </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  
   
   @opt[]
   $result[
           $.encloser["]
   #       $.separator[^#09]
   ]
   
   @main[]
   $filename[/t.cfg]
   $options2[
           $.encloser["]
   #       $.separator[^#09]
   ]
   
   $t1[^table::create{a    b
   1       "
   2       ""
   3       """}]
   
   ^t1.save[$filename][$options2]
   
   # if we try load with $options - we receive error
   $t2[^table::load[$filename][$options2]]
   #$t2[^table::load[$filename][^opt[]]]
   #$t2[^table::load[$filename][$.encloser["]]]
   
   
   <table border="1">
   <tr>
           <td>t1</td>
           <td>t2</td>
           <td>eq?</td>
   </tr>
   ^t1.menu{
           <tr>
                   <td>$t1.b</td>
                   <td>$t2.b</td>
                   <td>^if($t1.b eq $t2.b){YES}{NO}</td>
           </tr>
           ^t2.offset(1)
   }
   </table>

Removed from v.1.10  
changed lines
  Added in v.1.84.4.7


E-mail: