X-Git-Url: http://www.average.org/gitweb/?p=mkgallery.git;a=blobdiff_plain;f=mkgallery.pl;h=4166ae6ce2b1c0aa55cf01663f63b989037a8b79;hp=7857f4373490290a2fb0bd4a9423b40a55923cb1;hb=741d62b401cb7cf4b36f733c19af7b45ba51b1a8;hpb=2b0323392913d7822459e273f666de8d1992b5cb diff --git a/mkgallery.pl b/mkgallery.pl index 7857f43..4166ae6 100755 --- a/mkgallery.pl +++ b/mkgallery.pl @@ -509,7 +509,9 @@ sub makeaux { end_Tr, end_table,"\n", center(table({-class=>'picframe'}, - Tr(td(img({-src=>$imgsrc}))))),"\n", + Tr(td(img({-src=>$imgsrc, + -class=>'standalone', + -alt=>$title}))))),"\n", end_html,"\n"; close($F); } @@ -536,7 +538,9 @@ sub makeaux { start_center,"\n", h1($title),"\n", table({-class=>'ipage'}, - Tr(td(img({-src=>$imgsrc})), + Tr(td(img({-src=>$imgsrc, + -class=>'thumbnail', + -alt=>$title})), td($self->infotable))), a({-href=>'../index.html',-class=>'conceal'}, 'Index'),"\n", @@ -577,11 +581,14 @@ sub startindex { {-src=>$inc."overlay.js"}, {-src=>$inc."urlparser.js"}, {-src=>$inc."multibox.js"}, - {-src=>$inc."slideshow.js"}, + {-src=>$inc."showwin.js"}, + {-src=>$inc."controls.js"}, + {-src=>$inc."show.js"}, {-src=>$inc."gallery.js"}, - {-code=>"var incPrefix='$inc';"} ]),"\n", comment("Created by ".$version),"\n", + start_div({-class => 'indexContainer', + -id => 'indexContainer'}), a({-href=>"../index.html"},"UP"),"\n", start_center,"\n", h1($title),"\n", @@ -592,7 +599,9 @@ sub endindex { my $self = shift; my $IND = $self->{-IND}; - print $IND end_center,end_html,"\n"; + print $IND end_center,end_div, + # "\n",'',"\n", + end_html,"\n"; close($IND) if ($IND); undef $self->{-IND}; @@ -642,7 +651,7 @@ sub startimglist { my $slideref = sprintf(".html/%s-slide.html",$first); print $IND h2("Images ", - a({-href=>$slideref,-class=>'showStart',-id=>$first}, + a({-href=>$slideref,-class=>'showStart',-rel=>'i'.$first}, '> slideshow')),"\n"; } @@ -661,18 +670,20 @@ sub img_entry { print $IND a({-name=>$name}),"\n", start_table({-class=>'slide'}),start_Tr,start_td,"\n", - div({-class=>'slidetitle',-id=>$name}, + div({-class=>'slidetitle'}, "\n ",a({-href=>".html/$name-info.html", -title=>'Image Info: '.$name, -class=>'infoBox'}, $title),"\n"),"\n", - div({-class=>'slideimage',-id=>$name}, + div({-class=>'slideimage'}, "\n ",a({-href=>".html/$name-static.html", -title=>$title, -class=>'showImage', - -id=>$name}, - img({-src=>$thumb})),"\n"),"\n", - start_div({-class=>'varimages',-id=>$name,-name=>$title}),"\n"; + -rel=>'i'.$name}, + img({-src=>$thumb, + -class=>'thumbnail', + -alt=>$title})),"\n"),"\n", + start_div({-class=>'varimages',-id=>'i'.$name,-title=>$title}),"\n"; foreach my $sz(@sizes) { my $src=$self->{$sz}->{'url'}; my $w=$self->{$sz}->{'dim'}->[0];