--- mkgallery.pl	Sun Mar 16 00:07:00 2003
+++ mkgallery.pl.mod	Sun Jun 13 13:57:24 2004
@@ -248,23 +248,23 @@
 		    $gallery{strip_ws ($token) } = strip_ws ( $value );		    
 		}
 		close M;		
-		unshift @galleries, \%gallery;
+		push @galleries, \%gallery;
 	    }
 	}
     }
     my @rows;
     my @row;
-    my $i=0;
+    my $i=1;
     foreach my $g ( @galleries ) {
-	unshift @row, $g;
+	push @row, $g;
 	if ( $i % $P{cols} == 0 ) {
 	    my @r = @row;
-	    unshift @rows, { COLUMNS => \@r };
+	    push @rows, { COLUMNS => \@r };
 	    @row = ();
 	}
-	$i++;	
+	$i++;
     }
-    unshift @rows, { COLUMNS => \@row };
+    push @rows, { COLUMNS => \@row };
 
     my $param;
     $param->{ROWS}       = \@rows;