mir/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

eaf: don't pre-load stuff

Browse Source
This commit is contained in:
MitchMarq42 2023-06-12 19:47:17 -08:00
parent c44aac5cdf
commit 3950860dd4
1 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/mitch-packages.el
View File

@ -1143,6 +1143,7 @@ Taken from https://howardism.org/Technical/Emacs/eshell-why.html"
:pre-build (("python" "install-eaf.py" :pre-build (("python" "install-eaf.py"
"--install" "pdf-viewer" "browser" "--install" "pdf-viewer" "browser"
"--ignore-sys-deps"))) "--ignore-sys-deps")))
:commands (eaf-open-browser eaf-open-url-at-point)
:config (add-to-list 'load-path (expand-file-name "app/" eaf-source-dir)) :config (add-to-list 'load-path (expand-file-name "app/" eaf-source-dir))
(if (and (string= (getenv "XDG_CURRENT_DESKTOP") "Hyprland") (if (and (string= (getenv "XDG_CURRENT_DESKTOP") "Hyprland")
(featurep 'hypop)) (featurep 'hypop))
@ -1171,15 +1172,13 @@ This is redefined for use with `hypop' library because multiple Emacs frames may
(frame-x (truncate (/ (car coordinate) (frame-scale-factor)))) (frame-x (truncate (/ (car coordinate) (frame-scale-factor))))
(frame-y (truncate (/ (cadr coordinate) (frame-scale-factor))))) (frame-y (truncate (/ (cadr coordinate) (frame-scale-factor)))))
(list frame-x frame-y))) (list frame-x frame-y)))
(t (t (list 0 0)))))
(list 0 0)))))
)
(use-package eaf-browser (use-package eaf-browser
:elpaca nil :elpaca nil
:after eaf :after eaf
:custom :custom
(eaf-browser-continue-where-left-off t) (eaf-browser-continue-where-left-off t)
(eaf-browser-enable-adblocker t)) (eaf-browser-enable-adblocker t)))
(provide 'mitch-packages) (provide 'mitch-packages)
;;; mitch-packages.el ends here ;;; mitch-packages.el ends here