From 124442a811b6551fde17989555e9afc539bbb738 Mon Sep 17 00:00:00 2001
From: Iain Patterson <wm@iain.cx>
Date: Wed, 27 Mar 2013 21:10:01 +0000
Subject: [PATCH] Allow WPrefs to configure workspace switching keys.

Added MoveToWorkspace*Key, MoveToNextWorkspaceKey,
MoveToPrevWorkspaceKey, MoveToLastWorkspaceKey,
MoveToNextWorkspaceLayerKey and MoveToPrevWorkspaceLayerKey to the
keyboard shortcut panel of WPrefs.
---
 WPrefs.app/KeyboardShortcuts.c | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/WPrefs.app/KeyboardShortcuts.c b/WPrefs.app/KeyboardShortcuts.c
index f0eb2d6c..61a49a1a 100644
--- a/WPrefs.app/KeyboardShortcuts.c
+++ b/WPrefs.app/KeyboardShortcuts.c
@@ -104,6 +104,21 @@ static char *keyOptions[] = {
 	"Workspace8Key",
 	"Workspace9Key",
 	"Workspace10Key",
+	"MoveToNextWorkspaceKey",
+	"MoveToPrevWorkspaceKey",
+	"MoveToLastWorkspaceKey",
+	"MoveToNextWorkspaceLayerKey",
+	"MoveToPrevWorkspaceLayerKey",
+	"MoveToWorkspace1Key",
+	"MoveToWorkspace2Key",
+	"MoveToWorkspace3Key",
+	"MoveToWorkspace4Key",
+	"MoveToWorkspace5Key",
+	"MoveToWorkspace6Key",
+	"MoveToWorkspace7Key",
+	"MoveToWorkspace8Key",
+	"MoveToWorkspace9Key",
+	"MoveToWorkspace10Key",
 	"WindowShortcut1Key",
 	"WindowShortcut2Key",
 	"WindowShortcut3Key",
@@ -493,6 +508,21 @@ static void createPanel(Panel * p)
 	WMAddListItem(panel->actLs, _("Switch to workspace 8"));
 	WMAddListItem(panel->actLs, _("Switch to workspace 9"));
 	WMAddListItem(panel->actLs, _("Switch to workspace 10"));
+	WMAddListItem(panel->actLs, _("Move window to next workspace"));
+	WMAddListItem(panel->actLs, _("Move window to previous workspace"));
+	WMAddListItem(panel->actLs, _("Move window to last used workspace"));
+	WMAddListItem(panel->actLs, _("Move window to next ten workspaces"));
+	WMAddListItem(panel->actLs, _("Move window to previous ten workspaces"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 1"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 2"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 3"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 4"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 5"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 6"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 7"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 8"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 9"));
+	WMAddListItem(panel->actLs, _("Move window to workspace 10"));
 	WMAddListItem(panel->actLs, _("Shortcut for window 1"));
 	WMAddListItem(panel->actLs, _("Shortcut for window 2"));
 	WMAddListItem(panel->actLs, _("Shortcut for window 3"));
-- 
2.11.4.GIT