Hy3 based frames only mode
This commit is contained in:
parent
7b6b253fc7
commit
e79a0f867d
26
init.el
26
init.el
|
@ -283,3 +283,29 @@
|
|||
|
||||
(setq gc-cons-threshold (* 1024 1024 100)
|
||||
read-process-output-max (* 1024 1024))
|
||||
|
||||
;; hy3 retardation
|
||||
(use-package frames-only-mode
|
||||
:config
|
||||
(frames-only-mode))
|
||||
|
||||
(defun hyprctl (&rest args)
|
||||
(apply #'start-process (append '("hyprctl" "hyprctl-buf" "hyprctl" "dispatch") args)))
|
||||
|
||||
(advice-add #'evil-window-split :override
|
||||
(lambda (&optional count file)
|
||||
(hyprctl "hy3:makegroup" "v")
|
||||
(make-frame-command)))
|
||||
(advice-add #'evil-window-vsplit :override
|
||||
(lambda (&optional count file)
|
||||
(hyprctl "hy3:makegroup" "h")
|
||||
(make-frame-command)))
|
||||
|
||||
(advice-add #'evil-window-left :override
|
||||
(lambda (&optional count file) (hyprctl "hy3:movefocus" "l")))
|
||||
(advice-add #'evil-window-right :override
|
||||
(lambda (&optional count file) (hyprctl "hy3:movefocus" "r")))
|
||||
(advice-add #'evil-window-up :override
|
||||
(lambda (&optional count file) (hyprctl "hy3:movefocus" "u")))
|
||||
(advice-add #'evil-window-down :override
|
||||
(lambda (&optional count file) (hyprctl "hy3:movefocus" "d")))
|
||||
|
|
Loading…
Reference in a new issue