# HG changeset patch
# User Meredith Howard <mhoward@roomag.org>
# Date 1622867716 18000
# Node ID df71b104b7733538ea5708cc1c7cd969e2a92440
# Parent  1e388dfbe2004270b05ee3031dad546dfdad4ac3
Fix up focus-to shortcuts for new hammerspoon

diff --git a/.hammerspoon/init.lua b/.hammerspoon/init.lua
--- a/.hammerspoon/init.lua
+++ b/.hammerspoon/init.lua
@@ -6,23 +6,31 @@ local cmd      = hs.fnutils.partial(bind
 local cmdShift = hs.fnutils.partial(bindKey, {"cmd", "shift"})
 local cmdCtrl  = hs.fnutils.partial(bindKey, {"cmd", "ctrl"})
 
-function focusedWindow() return hs.window.focusedWindow() or hs.window.desktop() end
-function focusTo(direction) hs.window['focusWindow' .. direction](focusedWindow()) end
+function focusedWindow()
+  return hs.window.focusedWindow() or hs.window.desktop()
+end
+
+function focusTo(direction)
+  local fn = hs.getObjectMetatable('hs.window')['focusWindow' .. direction]
+  return function ()
+    fn(focusedWindow(), nil, nil, true)
+  end
+end
 
 -- and the key bindings
 cmdShift('r', hs.reload)
 
-cmd('k',  function () focusTo('North') end)
-cmd('up', function () focusTo('North') end)
+cmd('k',  focusTo('North'))
+cmd('up', focusTo('North'))
 
-cmd('j',    function () focusTo('South') end)
-cmd('down', function () focusTo('South') end)
+cmd('j',    focusTo('South'))
+cmd('down', focusTo('South'))
 
-cmd('h',    function () focusTo('West') end)
-cmd('left', function () focusTo('West') end)
+cmd('h',    focusTo('West'))
+cmd('left', focusTo('West'))
 
-cmd('l',     function () focusTo('East') end)
-cmd('right', function () focusTo('East') end)
+cmd('l',     focusTo('East'))
+cmd('right', focusTo('East'))
 
 cmdShift('up', function () focusedWindow():maximize() end)