<:=Path('album_name'):>

#c// ################################################################### #c// Dropfloat theme for album #c// Copyright 2005 Helmar Wieland #c// License: Creative Commons Attribution-ShareAlike 2.5 #c// http://creativecommons.org/licenses/by-sa/2.5/ #c// ###################################################################
<: Meta() :>//

- <:=Parent_Albums('
- » '):>
- » <:=Get($This_Image, 'name'):>
- >Up

<: print "
\n"; my $img = $This_Image; my $counter = 7; # reverse interation because of 'float-right' stacking $img = Next($img, 1); $img = Next($img, 1); $img = Next($img, 1); while ($counter) { print "
"; print Get($img, 'href', 'image_page', 'image_page'); print ""; print ""; print "
\n"; $img = Prev($img, 1); $counter--; } print "
\n"; print "
\n"; print "
\n"; print Get($This_Image, 'href', 'image_page', 'image'); print "\n"; print "
\n"; print "
";:>