問答無用に凍結バージョン

 痛み止め効いてきた。兎も角。
 「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に行が追加されそうだ。