MEL:一つ前のヒストリ(履歴)ノードを削除

//任意のオブジェクトを一つ選択(複数不可)

string $nodes[] = `ls -selection`;

string $shapes[] = `listRelatives -shapes $nodes[0]`;

select -r $shapes[0];

string $shapes1[] = `listHistory -levels 1 $shapes[0]`;

select -r $shapes1[1];Delete;