mouse wheel select the right pane first

1 files changed, 8 insertions, 2 deletions

diff --git a/src/event_dispatch.rs b/src/event_dispatch.rs
index 22887a6..6da2d16 100644
--- a/src/event_dispatch.rs
+++ b/src/event_dispatch.rs
@@ -27,8 +27,14 @@ impl EventDispatcher {
     /// which needs to know those keybindings.
     pub fn dispatch(&self, status: &mut Status, ev: Event) -> FmResult<()> {
         match ev {
-            Event::Key(Key::WheelUp(_, _, _)) => EventExec::event_move_up(status),
-            Event::Key(Key::WheelDown(_, _, _)) => EventExec::event_move_down(status),
+            Event::Key(Key::WheelUp(_, col, _)) => {
+                EventExec::event_select_pane(status, col)?;
+                EventExec::event_move_up(status)
+            }
+            Event::Key(Key::WheelDown(_, col, _)) => {
+                EventExec::event_select_pane(status, col)?;
+                EventExec::event_move_down(status)
+            }
             Event::Key(Key::SingleClick(MouseButton::Left, row, col)) => {
                 EventExec::event_select_pane(status, col)?;
                 EventExec::event_select_row(status.selected(), row)