[BACK]Return to 096.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / tests

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

version 1.3, 2008/08/26 11:52:13 version 1.6, 2010/07/25 06:14:46
Line 1 Line 1
 @main[]  @main[]
 ^test_exif[096_dir]  ^test_exif[096_dir]
   
   @test_exif[dir][file;image;keys]
 @test_exif[dir][file;image;keys]  $file[^file:list[$dir;\.(?i:jpe?g)^$]]
 $file[^file:list[$dir;\.(?i:jpe?g)^$]]  ^file.sort{$file.name}
 <table border="1">  <table border="1">
 ^file.menu{  ^file.menu{
         <tr valign="top">          <tr valign="top">
                 $image[^image::measure[$dir/$file.name]]                  $image[^image::measure[$dir/$file.name]]
                 <td>^image.html[$.width(100)$.height(100)]</td>                  <td>^image.html[$.width(100)$.height(100)]</td>
                 <td>                  <td>
                         $file.name<hr>                          $file.name<hr>
                         ^if($image.exif){                          ^if($image.exif){
                                 $keys[^image.exif._keys[]]                                  $keys[^image.exif._keys[]]
                                 ^keys.sort{$keys.key}                                  ^keys.sort{$keys.key}
                                 ^keys.menu{                                  ^keys.menu{
                                         ${keys.key}: <b>^show_exif_value[$image.exif.[$keys.key]]</b>                                          ${keys.key}: <b>^show_exif_value[$image.exif.[$keys.key]]</b>
                                 }[<br />]                                  }[<br />]
                         }{                          }{
                                 no EXIF info<br />                                  no EXIF info<br />
                         }                          }
                 </td>                  </td>
         </tr>          </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[]  }{
 }{          ^if($value is hash){
         ^if($value is hash){                  ^for[i](0;$value-1){$value.$i}[,]
                 ^for[i](0;$value-1){$value.$i}[,]          }{
         }{                  $value
                 $value          }
         }  }
 }  
Removed from v.1.3  
changed lines
  Added in v.1.6

E-mail: