]> mj.ucw.cz Git - gallery.git/blobdiff - gal2/UCW/Gallery/Web.pm
Gallery2: Experiments with HighSlide
[gallery.git] / gal2 / UCW / Gallery / Web.pm
index 34a76916dc8c16558015b41980550cb9c07243be..7df0b3ab2155f3601c078f0bb50b50837f2a96ff 100644 (file)
@@ -76,6 +76,14 @@ sub show_img($) {
        $self->html_bot;
 }
 
+sub show_pre_thumbs($) {
+       my ($self) = @_;
+}
+
+sub show_post_thumbs($) {
+       my ($self) = @_;
+}
+
 sub show_list($) {
        my ($self) = @_;
        $self->html_top;
@@ -84,6 +92,7 @@ sub show_list($) {
        print "<h1>", $self->get('Title'), "</h1>\n";
        my $subtitle = $self->get('SubTitle');
        print "<h2>$subtitle</h2>\n" if $subtitle ne "";
+       $self->show_pre_thumbs;
 
        my $meta = $self->{meta};
        for my $idx (1..$self->{num_photos}) {
@@ -97,6 +106,7 @@ sub show_list($) {
                $self->show_thumb($meta, $id, $click_url);
        }
 
+       $self->show_post_thumbs;
        $self->html_bot();
 }