blackbox-0.62.1-mouse_wheel.patch

[Marc Wilson]

Ok, I know shaleh hates it, and I know it's ugly, but I like it, so I fixed
the 0.61.1 patch up for 0.62.1, and here it is.

This will allow the mouse wheel to shade windows, and move between
workspaces.  We're all getting so keyboard-centric wrt blackbox... but
sometimes this is useful.

To me, anyway. ^_^

-- 
Marc Wilson
[EMAIL PROTECTED]
http://members.cox.net/msw


--- blackbox-0.62.1.orig/src/Window.cc  Sat Jan 19 08:06:30 2002
+++ blackbox-0.62.1/src/Window.cc       Wed Feb 27 21:59:42 2002
@@ -2547,6 +2547,12 @@
        windowmenu->hide();
       }
     }
+  } else if ( be->button == 4 && ( frame.label == be->window || frame.title == 
+be->window )) {
+    if (!flags.shaded)
+      shade();
+  } else if ( be->button == 5 ) {
+    if (flags.shaded)
+      shade();
   }
 
   blackbox->ungrab();

--- blackbox-0.62.1.orig/src/blackbox.cc        Sat Jan 12 03:17:26 2002
+++ blackbox-0.62.1/src/blackbox.cc     Wed Feb 27 22:05:53 2002
@@ -359,6 +359,16 @@
              checkMenu();
              screen->getRootmenu()->show();
            }
+          } else if (e->xbutton.button == 4) {
+            if ((screen->getCurrentWorkspaceID()-1)<0)
+              screen->changeWorkspaceID(screen->getCount()-1);
+            else
+              screen->changeWorkspaceID(screen->getCurrentWorkspaceID()-1);
+          } else if (e->xbutton.button == 5) {
+            if ((screen->getCurrentWorkspaceID()+1)>screen->getCount()-1)
+              screen->changeWorkspaceID(0);
+            else
+              screen->changeWorkspaceID(screen->getCurrentWorkspaceID()+1);
          }
        }
       }