scroll workspaces on root without alt

This commit is contained in:
Dana Jansens 2003-02-01 11:46:18 +00:00
parent e390e27756
commit dbfdd0fefb

View file

@ -96,10 +96,14 @@ def setup_scroll():
ob.MouseAction.Click, callbacks.next_desktop) ob.MouseAction.Click, callbacks.next_desktop)
ob.mbind("A-Up", ob.MouseContext.Root, ob.mbind("A-Up", ob.MouseContext.Root,
ob.MouseAction.Click, callbacks.next_desktop) ob.MouseAction.Click, callbacks.next_desktop)
ob.mbind("Up", ob.MouseContext.Root,
ob.MouseAction.Click, callbacks.next_desktop)
ob.mbind("A-Down", ob.MouseContext.Frame, ob.mbind("A-Down", ob.MouseContext.Frame,
ob.MouseAction.Click, callbacks.prev_desktop) ob.MouseAction.Click, callbacks.prev_desktop)
ob.mbind("A-Down", ob.MouseContext.Root, ob.mbind("A-Down", ob.MouseContext.Root,
ob.MouseAction.Click, callbacks.prev_desktop) ob.MouseAction.Click, callbacks.prev_desktop)
ob.mbind("Down", ob.MouseContext.Root,
ob.MouseAction.Click, callbacks.prev_desktop)
ob.mbind("C-A-Up", ob.MouseContext.Frame, ob.mbind("C-A-Up", ob.MouseContext.Frame,
ob.MouseAction.Click, callbacks.send_to_next_desktop) ob.MouseAction.Click, callbacks.send_to_next_desktop)