pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-06-14 04:11:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Updated packages

Browse source
This commit is contained in:
Benson Chu 2026-04-05 09:49:02 -05:00
parent 26c05d08c4
commit 6f4307601a
3 changed files with 6 additions and 33 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
config-exwm.org
View file

@ -23,12 +23,14 @@
;; System tray ;; System tray
(require 'exwm-systemtray) (require 'exwm-systemtray)
(exwm-systemtray-enable) (exwm-systemtray-mode t)
;; Multi monitor support ;; Multi monitor support
(require 'exwm-randr) (require 'exwm-randr)
(exwm-enable) (exwm-randr-mode t)
(exwm-randr-enable)
(add-hook 'emacs-startup-hook
'exwm-wm-mode)
;; This is a new-frame hack. Don't copy faces for floating windows ;; This is a new-frame hack. Don't copy faces for floating windows
(require 'face-copier) (require 'face-copier)
@ -77,9 +79,6 @@
(require 'exwm-startup) (require 'exwm-startup)
(add-hook 'exwm-init-hook 'call-startup-programs) (add-hook 'exwm-init-hook 'call-startup-programs)
(require 'exwm-systemtray)
(exwm-systemtray-enable)
;; Setup screens before anything else ;; Setup screens before anything else
(require 'exwm-screens) (require 'exwm-screens)
(add-hook 'exwm-init-hook 'my/setup-screens) (add-hook 'exwm-init-hook 'my/setup-screens)

26
config-min.org
View file

@ -111,32 +111,6 @@
(use-package affe (use-package affe
:config :config
(defun my/affe-find (&optional dir initial)
"Fuzzy find in DIR with optional INITIAL input."
(interactive "P")
(pcase-let* ((`(,prompt ,paths ,dir) (consult--directory-prompt "Fuzzy find" dir))
(default-directory dir))
(consult--read
(thread-first (consult--async-sink)
(consult--async-refresh-timer 0.05)
(consult--async-map (lambda (x) (string-remove-prefix "./" x)))
(affe--async (affe--command affe-find-command paths))
(consult--async-split #'consult--split-nil))
:prompt prompt
:sort nil
:require-match t
:history '(:input affe--find-history)
:initial initial
:category 'file
:add-history (thing-at-point 'filename)
:state (lambda (action cand)
(when (and cand (eq action 'return))
(find-file (expand-file-name cand dir)))))))
(advice-add #'affe-find
:override
#'my/affe-find)
(with-eval-after-load 'projectile (with-eval-after-load 'projectile
(define-key projectile-command-map (kbd "F") #'affe-find) (define-key projectile-command-map (kbd "F") #'affe-find)
(define-key projectile-command-map (kbd "s G") #'affe-grep)) (define-key projectile-command-map (kbd "s G") #'affe-grep))

2
elpa

@ -1 +1 @@
Subproject commit 6df853a359ff19a0a8fa40cc1dd52c0768a49129 Subproject commit b12ed477b68f85a0df9057f8c7b6d717b5a14586