#c options: -no_image_pages #c// ################################################################### #c// Another theme by Daveola http://MarginalHacks.com/ #c// ################################################################### <: $col_perc = int(100/Option('columns'))."%"; :>// Album: <: pAlbum_Name() :> <: Meta() :> #c # Are there any images? (There might only be Child_Albums!) <: if (Images()) { $saw_images = 1; _:> <: } _:>// End if images

<: pJoin_Parent_Albums(":"); :>

>Up

updated <: print `date` :>
<: if (isHeader()) { _:>
<:pHeader():>

<: } _:> #c # Are there more albums below this one? <: if (Child_Albums()) { _:> #c # Loop on all the albums <: while (Child_Albums()) { _:> #c # And start a new row every fourth one <: if (!((Child_Album_Cnt()+1) % Option('columns'))) { _:> <: } :> #c # End album loop <: Next_Child_Album() :> <: } :>

more:

 <: pChild_Album() :>
#c # End if albums <: } :> <: if ($saw_images) { _:> #c # Loop on the images <: my $count = 0; _:> <: Set_Image_This(0); _:> <: while(Images()) { _:> <: if (!(Image_Cnt() % Option('columns')) && Images_Left()) { _:> <: } :> #c # End while images <: Next_Image() :> <: } :>
<: print ""; $count++; pImage_Thumb_Src() if (Image_Is_Pic()); print "
\n"; print Image_Name(); print "
\n"; print "\n"; pImage_Caption(); print "\n"; :>
#c # End if images <: } :>
<: if (isFooter()) { _:>
<:pFooter():>
<: } _:>
<: Credit() :>