my $haveimagick = eval { require Image::Magick; };
{ package Image::Magick; } # to make perl compiler happy
my $haveimagick = eval { require Image::Magick; };
{ package Image::Magick; } # to make perl compiler happy
}
my $imgsrc = sprintf("../.%s/%s",$sizes[0],$name);
print $F start_html(-title=>$title,
}
my $imgsrc = sprintf("../.%s/%s",$sizes[0],$name);
print $F start_html(-title=>$title,
-style=>{-src=>$inc."gallery.css"},),"\n",
start_center,"\n",
h1($title),"\n",
-style=>{-src=>$inc."gallery.css"},),"\n",
start_center,"\n",
h1($title),"\n",
$self->{-IND} = $IND;
my $inc = $self->{-inc};
my $title = $self->{-title};
print $IND start_html(-title => $title,
$self->{-IND} = $IND;
my $inc = $self->{-inc};
my $title = $self->{-title};
print $IND start_html(-title => $title,
-style=>{-src=>[$inc."gallery.css",
$inc."lightbox.css"]},
-script=>[{-code=>"var incPrefix='$inc';"},
-style=>{-src=>[$inc."gallery.css",
$inc."lightbox.css"]},
-script=>[{-code=>"var incPrefix='$inc';"},