問答無用に凍結バージョン
痛み止め効いてきた。兎も角。
「DefaultStorage.pm」の「save_page」処理で
} else {
#↓凍結用
open(DATA,">>".$self->{wiki}->config('log_dir')."/".$self->{wiki}->config('freeze_file')) or die $!;
binmode(DATA);
print DATA $page."\n";
close(DATA);
#↑凍結用
# 上書きする
で、問答無用に凍結バージョンは出来た。あとはConfig.datに新設する凍結フラグを確認する処理と、すでにFreeze.logに同名のファイルが存在するか、のチェックを追加するだけかな。さもないと編集するたびにFreeze.logに行が追加されそうだ。