toki/doom-config
1
0
Fork 0
Code Issues Pull requests Activity

fix: delay loading of function override

Browse source
This commit is contained in:
Kiana Sheibani 2025-10-22 13:39:23 -04:00
parent 3e66f68c49
commit 28d500c39e
Signed by: toki
GPG key ID: 6CB106C25E86A9F7
1 changed files with 16 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

32
config.org
View file

@ -2659,23 +2659,23 @@ Emacs Everywhere is a great idea. Unfortunately, the default package on MELPA us
emacs-everywhere-copy-command
'("sh" "-c" "wl-copy < %f")
emacs-everywhere-window-focus-command
'("hyprctl" "dispatch" "focuswindow" "address:%w")))
'("hyprctl" "dispatch" "focuswindow" "address:%w"))
;; Function for accessing current window
(defun emacs-everywhere--app-info-linux-hyprland ()
"Return information on the active window, on Hyprland."
(pcase-let*
((`(,window-id ,window-class ,window-title . ,window-dims-)
(split-string (shell-command-to-string
"hyprctl activewindow -j | jaq -r \
'.address, .class, .title, .at[], .size[]'")
"\n"))
(window-dims (mapcar #'string-to-number (butlast window-dims-))))
(make-emacs-everywhere-app
:id window-id
:class window-class
:title window-title
:geometry window-dims)))
;; Function for accessing current window
(defun emacs-everywhere--app-info-linux-hyprland ()
"Return information on the active window, on Hyprland."
(pcase-let*
((`(,window-id ,window-class ,window-title . ,window-dims-)
(split-string (shell-command-to-string
"hyprctl activewindow -j | jaq -r \
'.address, .class, .title, .at[], .size[]'")
"\n"))
(window-dims (mapcar #'string-to-number (butlast window-dims-))))
(make-emacs-everywhere-app
:id window-id
:class window-class
:title window-title
:geometry window-dims))))
(defpatch! emacs-everywhere
(defun emacs-everywhere--app-info-linux) ()