Pan with middle mouse button too. #2444

This commit is contained in:
Alessandro Ranellucci 2014-12-25 20:08:47 +01:00
parent 6ac82f1a20
commit 5dc635b0b1

View file

@ -189,7 +189,7 @@ sub mouse_event {
$self->Refresh;
}
$self->_drag_start_pos($pos);
} elsif ($e->RightIsDown) {
} elsif ($e->MiddleIsDown || $e->RightIsDown) {
# if dragging over blank area with right button, translate
if (defined $self->_drag_start_xy) {