my $imgsrc = sprintf("../.%s/%s",$sizes[0],$name);
print $F start_html(-title=>$title,
-encoding=>"utf-8",
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",
print $IND a({-name=>$i}),"\n",
start_table({-class=>'slide'}),start_Tr,start_td,"\n",
div({-class=>'slidetitle',-id=>$name},
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',
+ a({-href=>".html/$name-info.html?conceal",
+ -title=>'Image Info: '.$name,