雑文 - 八百万屋総本舗　電脳支店　since 2019

更新非表示コンテンツが、新着一覧に表示されてしまう不具合について、公式に問い合せたところ、以下の回答を頂いたので、自分の覚えも兼ねて

だいたい７７行目あたりにある、

##プライベートコンテンツ判定
my $PrivateFlag=0;
my $pi=0;
foreach (@Privates) {
if ($Privates[$pi] eq $DirName[0]) { $PrivateFlag=1; }
$pi++;
}

ここに

##プライベートコンテンツ判定
my $PrivateFlag=0;
my $pi=0;
foreach (@Privates) {
$PrivateFlag=0;
if ($Privates[$pi] eq $DirName[0]) { $PrivateFlag=1; }
$pi++;
}

を追加
するといいそうです。
オイラんところは直りました。
ありがとうございました。