--- okuchuu/blue-oceans/board-t/board.cgi 2001/12/03 06:23:35 1.1 +++ okuchuu/blue-oceans/board-t/board.cgi 2002/02/10 00:48:06 1.2 @@ -115,11 +115,12 @@ $defhead = <<"EOH"; + $title - - + + @@ -183,23 +184,23 @@ Content-Style-Type: text/css Content-Script-Type: text/javascript - + - - + + $link_element $title ($sub_title) _EOF_ if($indent eq 'css'){ my($i, $tmp_margin); - $s .= ''; + $s .= ''; } $s .= <<"_EOF_"; @@ -224,7 +225,7 @@ sub ichiran { &set_cookie; - local($s) = &html_header('一覧表示'); + local($s) = &html_header('記事一覧'); #ログ読み出し open(LOG, $logfile) or &Suika::CGI::Error::die('open', file => $logfile); @@ -242,7 +243,7 @@ } print $html_info; - print '

記事一覧

'; + print '
'; print "

([全]を選択すると関連記事も含めて一括表示できます。)

\n"; $tree = int($tree/$max_tree) * $max_tree; $end_tree = $tree + $max_tree; @@ -279,7 +280,7 @@ print "[全]"; } elsif ($indent eq 'space') { my($space_width) = $lx * 2 + 2; - print '　' x $space_width; + print ' ' x $space_width; } print ""; if ($no > $count - $new_kiji) { @@ -336,6 +337,7 @@ if (!$children) { $children = 'コメントは投稿されていません。

'; } else{$children = "以下のコメントが投稿されています。

\n
    $children
";} $s .= <<"_EOF_"; +

$parent $children

@@ -1024,8 +1026,8 @@ $link_element - - + + (エラー報告) @@ -1048,8 +1050,8 @@ "http://www.w3.org/TR/html4/strict.dtd"> - - + + (エラー報告)