sub renderThumbnails { my $this = shift; #writeDebug("renderThumbnails()"); if (!@{$this->{images}}) { return renderError($this->{warn}); } my $maxCols = $this->{columns}; my $result = "
| {IGP_web}, $image->{IGP_topic})
. "?id=$this->{id}&filename=$image->{name}#igp$this->{id}\">"
. " | \n";
if (!$this->createImg($image, 1)) {
return renderError($this->{errorMsg});
}
$imageNr++;
if ($imageNr % $maxCols == 0) {
$result .= "\n"; $imageNr++; } $result .= "\n"; if ($this->{doThumbTitles}) { $result .= $this->renderTitleRow(\@rowOfImages); } } $result .= " |