--- trunk/lib/Continuity/Widget.pm 2008/07/10 17:19:40 84 +++ trunk/lib/Continuity/Widget.pm 2008/07/10 17:27:39 85 @@ -133,6 +133,9 @@ sub remove_button { my ( $self, $name ) = @_; delete( $self->callback->{$name} ); + my @new_order = grep { !/\Q$name\E/ } @{ $self->callback_order }; + warn "# remove_button $name new order = ",dump( @new_order ); + $self->callback_order( \@new_order ); } sub render_buttons {