| |
テストしてみたんですが、たしかにヘッダが削除されてませんでした。あと、
複数選択して実行するのにも対応してないようです。
その辺直してみました。
TkDeleteHeader.macの164行目にある、
if( #sphere == 1 ) call DeleteHeader;
else call FolderDelete;
の２行を、
if( #sphere == 1 ) {
##tmp = dllfunc("LockSelection");
while( 1 ) {
##tmp = dllfunc("EnumSelection", 1);
if( ##tmp == 0 ) {
break;
}
##tmp = dllfunc("BeginEditMail");
call DeleteHeader;
##tmp = dllfunc("SaveEditMail", 0, 0);
if( #mark == 1 ) {
##tmp = dllfunc("SetMailFlag", "altered", 1);
}
}
##tmp = dllfunc("UnlockSelection", 1);
} else {
call FolderDelete;
}
のように直せばうまくいきました。
山紫水明さんに連絡した方がいいかもしれません。
|
|