|
|
|
(local log (hs.logger.new "log" "info"))
|
|
|
|
|
|
|
|
(set hs.window.animationDuration 0.0)
|
|
|
|
(hs.loadSpoon "MiroWindowsManager")
|
|
|
|
(let [mash [:cmd :alt :ctrl]
|
|
|
|
smash [:cmd :alt :ctrl :shift]]
|
|
|
|
(spoon.MiroWindowsManager:bindHotkeys {
|
|
|
|
:up [ mash "k" ]
|
|
|
|
:left [ mash "h" ]
|
|
|
|
:down [ mash "j" ]
|
|
|
|
:right [ mash "l" ]
|
|
|
|
:fullscreen [ mash "m" ]
|
|
|
|
:center [ mash "c" ]
|
|
|
|
:move [ smash "m" ]
|
|
|
|
:resize [ mash "d" ]
|
|
|
|
}))
|
|
|
|
|
|
|
|
(let [mash [:cmd :alt :ctrl]
|
|
|
|
smash [:cmd :alt :ctrl :shift]]
|
|
|
|
|
|
|
|
;; defeat paste blocking
|
|
|
|
(hs.hotkey.bind [:cmd :alt] "v" (fn [] (hs.eventtap.keyStrokes (hs.pasteboard.getContents)))))
|
|
|
|
|
|
|
|
(set hs.logger.defaultLogLevel "info")
|
|
|
|
|
|
|
|
(set hs.urlevent.httpCallback
|
|
|
|
(fn [scheme host params fullURL]
|
|
|
|
(let [command (.. "curl -Ls -o /dev/null -w %{url_effective} " fullURL)
|
|
|
|
handle (io.popen command)
|
|
|
|
url (handle:read "*a")]
|
|
|
|
(if (string.find url "^https?://.*[.]zoom.us/j/%d+")
|
|
|
|
(hs.urlevent.openURLWithBundle fullURL "us.zoom.xos")
|
|
|
|
(hs.urlevent.openURLWithBundle fullURL "org.mozilla.firefoxdeveloperedition")))))
|
|
|
|
|
|
|
|
(hs.loadSpoon "ReloadConfiguration")
|
|
|
|
(spoon.ReloadConfiguration:start)
|
|
|
|
|
|
|
|
(let [n (hs.notify.new {
|
|
|
|
:title "Hammerspoon"
|
|
|
|
:informativeText "Config loaded"
|
|
|
|
:withdrawAfter 2
|
|
|
|
})]
|
|
|
|
(n:send))
|