| … | |
… | |
| 2410 | |
2410 | |
| 2411 | $self->SUPER::invoke_button_down ($ev, $x, $y); |
2411 | $self->SUPER::invoke_button_down ($ev, $x, $y); |
| 2412 | |
2412 | |
| 2413 | $self->{click} = [$self->{range}[0], $self->{vertical} ? $y : $x]; |
2413 | $self->{click} = [$self->{range}[0], $self->{vertical} ? $y : $x]; |
| 2414 | |
2414 | |
| 2415 | $self->mouse_motion ($ev, $x, $y) |
2415 | $self->invoke_mouse_motion ($ev, $x, $y) |
| 2416 | } |
2416 | } |
| 2417 | |
2417 | |
| 2418 | sub invoke_mouse_motion { |
2418 | sub invoke_mouse_motion { |
| 2419 | my ($self, $ev, $x, $y) = @_; |
2419 | my ($self, $ev, $x, $y) = @_; |
| 2420 | |
2420 | |
