parser3/tests/096.html - view

Return to 096.html CVS log

Up to [parser3project] / parser3 / tests

File: [parser3project] / parser3 / tests / 096.html
Revision 1.2: download - view: text, annotated - select for diffs - revision graph
Thu Jul 24 11:25:58 2003 UTC (22 years, 10 months ago) by paf
Branches: MAIN
CVS tags: release_3_2_3, release_3_2_2, release_3_2_1, release_3_2_0, release_3_1_6, release_3_1_5, release_3_1_4, release_3_1_3, release_3_1_2, release_3_1_1, release_3_1_0, paf_left, HEAD

merged(copied) to HEAD from template_gc

@main[]
^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>
     		}
     	}{
     		no EXIF info<br>
     	}
    </td>
</tr>
}
</table>

@show_exif_value[value][i]
^if($value is date){
	^value.sql-string[]
}{
	^if($value is hash){
		^for[i](0;$value-1){$value.$i}[,]
	}{
		$value
	}
}

E-mail: