Diff for /parser3/www/htdocs/Attic/index.html between versions 1.176 and 1.178

version 1.176, 2002/10/31 16:08:31 version 1.178, 2002/11/22 16:16:34
Line 6 Line 6
 $selffilespec[$filespec]  $selffilespec[$filespec]
 #$form:here  #$form:here
 #$request:charset[UTF-8]  #$request:charset[UTF-8]
 ##$request:charset[windows-1251]  $request:charset[windows-1251]
 ##$response:charset[windows-1251]  $response:charset[windows-1251]
 #$response:charset[UTF-8]  #$response:charset[UTF-8]
 #$response:charset[empty]  #$response:charset[empty]
 #$response:content-type[$.value[text/html]$.charset[$response:charset]]  #$response:content-type[$.value[text/html]$.charset[$response:charset]]
Line 290  OK Line 290  OK
 #^emailhead2[]  #^emailhead2[]
 #^includet2overridedynamic[]  #^includet2overridedynamic[]
 #^includet2overridestatic[]  #^includet2overridestatic[]
 ^virtualtest2[]  #^virtualtest2[]
   #^message-id-test[]
   ^test_exif[jpg]
   
   @test_exif[dir]
   $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]]
   <table border=1>
   ^file.menu{
   <tr valign=top>
           $image[^image::measure[$dir/$file.name]]
           <td>^image.html[$.width(100)$.height(100)]</td>
           <td>
                   $file.name<hr>
           $exif[$image.exif]
           ^if($exif){
                   $keys[^exif._keys[]] ^keys.sort{$keys.key}
                   ^keys.menu{
                           $key[$keys.key]
                           $value[$exif.$key]
   
                           ${key}: <b>^show_exif_value[$value]</b><br>
                   }
           }{
                   no EXIF info<br>
           }
       </td>
   </tr>
   }
   </table>
   
   @show_exif_value[value][i]
   ^if($value is hash){
           ^for[i](0;$value-1){$value.$i}[,]
   }{
           $value
   }
   
   
   @message-id-test[]
   ^mail:send[
           $.from[paf@mail]
           $.to[paf@mail]
           $.subject[test]
   #       $.message-id[<1@parser.ru>]
           $.Message-id[<2@parser.ru>]
           $.subject[проверка]
           $.text[мычит!]
   ]
   
 @virtualtest2[]  @virtualtest2[]
 $derived[^derived::create[]]  $derived[^derived::create[]]

Removed from v.1.176  
changed lines
  Added in v.1.178


E-mail: