- $title)),
- a({-href=>".html/$name-static.html",-title=>$title,
- -id=>$name,
- -OnClick=>"Lightbox.show('$medium','$title');return false;"},
- img({-src=>$thumb})),
- br,
- div({-style=>"display: none;"},
- a({-href=>$thumb,-rel=>"lightbox[thm]",
- -title=>'Thumb'},"Thm"),
- a({-href=>$medium,-rel=>"lightbox[sml]",
- -title=>'Small'},"Sml")),
- a({-href=>$name,-title=>'Original'},"($w x $h)"),
- br))),"\n";
+ $title)),"\n",
+ div({-class=>'slideimage',-id=>$name},
+ a({-href=>".html/$name-static.html",-title=>$title,
+ -id=>$name,
+ -OnClick=>"return run_slideshow(".$i.");"},
+ img({-src=>$thumb}))),"\n",
+ start_div({-class=>'varimages',-id=>$i});
+ foreach my $sz(@sizes) {
+ my $src=$self->{$sz}->{'url'};
+ my $w=$self->{$sz}->{'dim'}->[0];
+ my $h=$self->{$sz}->{'dim'}->[1];
+ print $IND a({-href=>$src,-style=>"display: none;",
+ -class=>($sz == 640)?"slideshowThumbnail":"",
+ -title=>"Reduced to ".$w."x".$h},
+ $w."x".$h)," ";
+ }
+ print $IND a({-href=>$name,
+ -title=>'Original'},$w."x".$h),
+ end_div,"\n",
+ end_td,end_Tr,end_table,"\n";