%# "I used to think I was indecisive, but now I'm not so sure."
<%PERL>
my $Sibling = $Part->prev_sibling or return;
$Part->move(before => $Sibling);
return -1;
</%PERL>
<%ARGS>
$Part
</%ARGS>
