-<div class=gallery>
-% for my $d (@$dd) {
-% my ($ddd, $fff, $iii) = listdir $real . "/" . $d->name;
-% my $tn;
-% if ($iii) { $tn = join_paths $path, $d->name, $iii->name; }
-% else { $tn = undef; }
- <& .thumbnail, target => $d->name . "/", img => $tn,
- caption => $m->interp->apply_escapes($d->name, "h"),
- comment => $d->comment &>\
-% }
+% for my $size (qw{medthumb}) {
+<div class="gallery <% $size %>">
+% for my $d (@$dd) {
+ <& .thumbnail, target => $d->name . "/", comment => $d->comment,
+ img => $tn{$d}, size => $size,
+ caption => $m->interp->apply_escapes($d->name, "h") &>\
+% }