X-Git-Url: http://www.average.org/gitweb/?p=mkgallery.git;a=blobdiff_plain;f=mkgallery.pl;h=26e1729e3d11bddad9967ce68abe190cc9a905f1;hp=085f42a7a0600826a41c64d609cf9d30661462d8;hb=1826ee90530507454b5cdd69a76a385f63f5e8d5;hpb=f3e1802f95e4674c5994d18d01fe840758174194 diff --git a/mkgallery.pl b/mkgallery.pl index 085f42a..26e1729 100755 --- a/mkgallery.pl +++ b/mkgallery.pl @@ -524,13 +524,19 @@ sub makeaux { my $imgsrc = sprintf("../.%s/%s",$sizes[0],$name); print $F start_html(-title=>$title, -encoding=>"utf-8", - -style=>{-src=>$inc."gallery.css"},),"\n", + -style=>{-src=>$inc."gallery.css"}, + -script=>[ + {-src=>$inc."mootools.js"}, + {-src=>$inc."urlparser.js"}, + {-src=>$inc."infopage.js"}, + ]),"\n", start_center,"\n", h1($title),"\n", table({-class=>'ipage'}, Tr(td(img({-src=>$imgsrc})), td($self->infotable))), - a({-href=>'../index.html'},'Index'),"\n", + a({-href=>'../index.html',-class=>'conceal'}, + 'Index'),"\n", end_center,"\n", end_html,"\n"; close($F); @@ -667,23 +673,13 @@ sub img_entry { my $i=0+$self->{-parent}->{-numofimgs}; $self->{-parent}->{-numofimgs}++; - print $IND start_div({-class=>'ibox',-id=>$name, - -OnClick=>"HideIbox('$name');"}),"\n", - start_div({-class=>'iboxtitle'}), - span({-style=>'float: left;'},b("Info for $name")), - span({-style=>'float: right;'}, - a({-href=>"#",-OnClick=>"HideIbox('$name');"},"Close")), - br({-clear=>'all'}),"\n", - end_div,"\n", - $self->infotable, - end_div,"\n"; print $IND a({-name=>$i}),"\n", start_table({-class=>'slide'}),start_Tr,start_td,"\n", div({-class=>'slidetitle',-id=>$name}, - a({-href=>".html/$name-info.html", - -title=>'Image Info', - -class=>'infobox'}, + a({-href=>".html/$name-info.html?conceal", + -title=>'Image Info: '.$name, + -class=>'infoBox'}, $title)),"\n", div({-class=>'slideimage',-id=>$name}, a({-href=>".html/$name-static.html",-title=>$title,