Glitches when panning with middle mouse button. #2454

This commit is contained in:
Alessandro Ranellucci 2015-01-07 11:58:22 +01:00
parent 4688ae2fb6
commit 6962b8dddd

View File

@ -208,7 +208,7 @@ sub mouse_event {
}
$self->_drag_start_xy($pos);
}
} elsif ($e->LeftUp || $e->RightUp) {
} elsif ($e->LeftUp || $e->MiddleUp || $e->RightUp) {
if ($self->on_move && defined $self->_drag_volume_idx) {
$self->on_move->($self->_drag_volume_idx) if $self->_dragged;
}