Diff for /parser3/tests/096.html between versions 1.1.2.1 and 1.3

version 1.1.2.1, 2003/03/04 12:38:16 version 1.3, 2008/08/26 11:52:13
Line 1 Line 1
 @main[]  @main[]
 ^test_exif[096_dir]  ^test_exif[096_dir]
   
 @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>  @test_exif[dir][file;image;keys]
                 }  $file[^file:list[$dir;\.(?i:jpe?g)^$]]
         }{  <table border="1">
                 no EXIF info<br>  ^file.menu{
         }          <tr valign="top">
     </td>                  $image[^image::measure[$dir/$file.name]]
 </tr>                  <td>^image.html[$.width(100)$.height(100)]</td>
                   <td>
                           $file.name<hr>
                           ^if($image.exif){
                                   $keys[^image.exif._keys[]]
                                   ^keys.sort{$keys.key}
                                   ^keys.menu{
                                           ${keys.key}: <b>^show_exif_value[$image.exif.[$keys.key]]</b>
                                   }[<br />]
                           }{
                                   no EXIF info<br />
                           }
                   </td>
           </tr>
 }  }
 </table>  </table>
   
   
 @show_exif_value[value][i]  @show_exif_value[value][i]
 ^if($value is date){  ^if($value is date){
         ^value.sql-string[]          ^value.sql-string[]

Removed from v.1.1.2.1  
changed lines
  Added in v.1.3


E-mail: