+ if ($refresh or $latex) {
+ foreach $uid (@{$uids{$key}}) {
+ print WRITE print_tag($key, $uid) . " $uid\n";
+ if ($latex and ($uid eq "Photo ID")) {
+ print WRITE "\\begin{flushright}\n";
+ print WRITE "\\includegraphics[height=3cm]{$key.eps}\n";
+ print WRITE "\\end{flushright}\n";
+ }
+ }
+ }