--- 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; 
</div><div class="naked_ctrl">
<form action="/index.cgi/speech" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="http://www.scheibli.com/patches/bbgallery-1.2.0-MetaIndexTableBug.patch">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="http://www.scheibli.com/patches/bbgallery-1.2.0-MetaIndexTableBug.patch" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech" selected="selected">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>