From 341c4e04ffc5572dc02563df914dc65a0a57b9f3 Mon Sep 17 00:00:00 2001
From: Dana Jansens <danakj@orodu.net>
Date: Mon, 27 May 2002 03:12:21 +0000
Subject: mouse wheel support custom titlebar layout

---
 src/Screen.cc | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'src/Screen.cc')

diff --git a/src/Screen.cc b/src/Screen.cc
index 67033a82..919ea9b6 100644
--- a/src/Screen.cc
+++ b/src/Screen.cc
@@ -1927,6 +1927,18 @@ void BScreen::buttonPressEvent(XButtonEvent *xbutton) {
       blackbox->checkMenu();
       rootmenu->show();
     }
+  // mouse wheel up
+  } else if (xbutton->button == 4) {
+    if (getCurrentWorkspaceID() >= getWorkspaceCount() - 1)
+      changeWorkspaceID(0);
+    else
+      changeWorkspaceID(getCurrentWorkspaceID() + 1);
+  // mouse wheel down
+  } else if (xbutton->button == 5) {
+    if (getCurrentWorkspaceID() == 0)
+      changeWorkspaceID(getWorkspaceCount() - 1);
+    else
+      changeWorkspaceID(getCurrentWorkspaceID() - 1);
   }
 }
 
-- 
cgit v1.2.3