Image::Magick圧縮率変更

Image::Magickによる画像圧縮の画質調整。

/lib/MT/Image.pm の95行目（ImageToBlobという単語が含まれている行：Movable Type 3.34-ja）の前に以下の１行を追加。

$magick->Set(quality=>90);

wantarray ? ($magick->ImageToBlob, $w, $h) : $magick->ImageToBlob;

数字は圧縮率。マックス100です。
デフォルトは75の模様。

画像処理にNetPBMを使用している場合はこの設定は無効です。