Drop ion files
[grml-desktop.git] / etc / skel / .ion2 / go_frame_or_desk.lua
diff --git a/etc/skel/.ion2/go_frame_or_desk.lua b/etc/skel/.ion2/go_frame_or_desk.lua
deleted file mode 100644 (file)
index 5141fad..0000000
+++ /dev/null
@@ -1,50 +0,0 @@
--- Goes to the frame in the specified direction. If there is no frame in the
--- given direction, it goes to the next workspace in the direction, being:
---     left  = previous workspace
---     right = next workspace
---
--- By 2004, Rene van Bevern <rvb@pro-linux.de>
---     Public Domain
---
--- If you are about to go to a frame that would be left to the leftmost frame,
--- the function switches to a previous workspace and goes to its rightmost frame.
--- If you are about to go to a frame that would be right of the rightmost frame,
--- the function switches to the next workspace and goes to its leftmost frame.
---
--- To use this function you need to bind keys in the ionws_bindings
---
--- ionws_bindings {
---    kpress(DEFAULT_MOD.."Down", function(f) go_frame_or_desk(f, "down") end),
---    kpress(DEFAULT_MOD.."Up", function(f) go_frame_or_desk(f, "up") end),
---    kpress(DEFAULT_MOD.."Right", function(f) go_frame_or_desk(f, "right") end),
---    kpress(DEFAULT_MOD.."Left", function(f) go_frame_or_desk(f, "left") end)
--- }
-
-function go_frame_or_desk(ws, dir)
-       local reg = ws:current()
-       local scr = ws:screen_of()
-       if ws:next_to(reg,dir)  then ws:goto_dir(dir)
-       elseif dir == "left"    then
-               scr:switch_prev()
-               WRegion.goto(scr:current():rightmost())
-       elseif dir == "right"   then
-               scr:switch_next()
-               WRegion.goto(scr:current():leftmost())
-       end
-end
-
-function go_frame_or_desk_left(reg)
-       go_frame_or_desk(reg, "left")
-end
-
-function go_frame_or_desk_right(reg)
-       go_frame_or_desk(reg, "right")
-end
-
-function go_frame_or_desk_up(reg)
-       go_frame_or_desk(reg, "up")
-end
-
-function go_frame_or_desk_down(reg)
-       go_frame_or_desk(reg, "down")
-end