Compare commits

...

2 Commits

Author SHA1 Message Date
tomatocream 4be0e63fac set to use eat add key bindings 2026-03-15 13:52:36 +08:00
tomatocream cb6d55b456 Update Claude terminal and theme configuration.
Switch Claude Code usage toward EAT-related setup and simplify theme loading to doom-one while adding the emacs-eat package declaration.

Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>
2026-03-06 02:19:39 +08:00
5 changed files with 55 additions and 30 deletions
+34 -26
View File
@@ -186,13 +186,18 @@
(setq claude-code-program "ccr" (setq claude-code-program "ccr"
claude-code-program-switches '("code" "--dangerously-skip-permissions")) claude-code-program-switches '("code" "--dangerously-skip-permissions"))
;; Use vterm backend ;; Use Eat backend
(setq claude-code-terminal-backend 'eat) (setq claude-code-terminal-backend 'eat
;; Emacs-style editing in Claude buffer: RET inserts newline, S-RET sends
claude-code-newline-keybinding-style 'shift-return-to-send)
;; Enable global mode ;; Enable global mode
(claude-code-mode 1) (claude-code-mode 1)
;; Set key bindings prefix ;; Emacs-style prefix key (works without Doom/Evil leader keys)
(global-set-key (kbd "C-c c") claude-code-command-map)
;; Set Doom leader keybindings
(map! :leader (map! :leader
(:prefix ("C" . "claude-code") (:prefix ("C" . "claude-code")
:desc "Start Claude" "c" #'claude-code :desc "Start Claude" "c" #'claude-code
@@ -237,26 +242,29 @@
(when (eq claude-code-terminal-backend 'vterm) (when (eq claude-code-terminal-backend 'vterm)
(setq-local vterm-max-scrollback 100000))))) (setq-local vterm-max-scrollback 100000)))))
(use-package! claudemacs ;; (use-package! claudemacs
:defer t ;; :defer t
:commands (claudemacs claudemacs-transient-menu) ;; :commands (claudemacs claudemacs-transient-menu)
:init ;; :init
(setq claudemacs-program "ccr" ;; (setq claudemacs-program "ccr"
claudemacs-program-switches '("code" "--dangerously-skip-permissions") ;; claudemacs-program-switches '("code" "--dangerously-skip-permissions")
claudemacs-default-tool 'claude ;; claudemacs-default-tool 'claude
claudemacs-prefer-projectile-root t) ;; claudemacs-prefer-projectile-root t)
:config ;; :config
(map! :map prog-mode-map ;; (map! :map prog-mode-map
"C-c C-e" #'claudemacs-transient-menu) ;; "C-c C-e" #'claudemacs-transient-menu)
(map! :map emacs-lisp-mode-map ;; (map! :map emacs-lisp-mode-map
"C-c C-e" #'claudemacs-transient-menu) ;; "C-c C-e" #'claudemacs-transient-menu)
(map! :map text-mode-map ;; (map! :map text-mode-map
"C-c C-e" #'claudemacs-transient-menu) ;; "C-c C-e" #'claudemacs-transient-menu)
(after! python ;; (after! python
(map! :map python-base-mode-map ;; (map! :map python-base-mode-map
"C-c C-e" #'claudemacs-transient-menu)) ;; "C-c C-e" #'claudemacs-transient-menu))
(after! eat ;; (after! eat
(setq eat-term-scrollback-size 400000)) ;; (setq eat-term-scrollback-size 400000)
(map! :leader ;; (add-hook 'eat-mode-hook
(:prefix ("C" . "claude-code") ;; (lambda ()
:desc "Claudemacs menu" "E" #'claudemacs-transient-menu))) ;; (setq-local show-trailing-whitespace nil))))
;; (map! :leader
;; (:prefix ("C" . "claude-code")
;; :desc "Claudemacs menu" "E" #'claudemacs-transient-menu)))
+4 -1
View File
@@ -12,6 +12,9 @@
(setq super-save-auto-save-when-idle t) (setq super-save-auto-save-when-idle t)
(setq super-save-idle-duration 1)) (setq super-save-idle-duration 1))
;; Which-key: show keybindings faster
(setq which-key-idle-delay 0.01
which-key-min-display-time 0.1)
;; Search bindings for consult-line ;; Search bindings for consult-line
(map! (map!
@@ -19,4 +22,4 @@
:n "M-s" (lambda () (interactive) (consult-line (thing-at-point 'symbol))) :n "M-s" (lambda () (interactive) (consult-line (thing-at-point 'symbol)))
:n "C-S-s" #'consult-line-multi) :n "C-S-s" #'consult-line-multi)
(setq-default show-trailing-whitespace t) (setq-default show-trailing-whitespace nil)
+1
View File
@@ -48,6 +48,7 @@
;;unicode ; extended unicode support for various languages ;;unicode ; extended unicode support for various languages
(vc-gutter +pretty) ; vcs diff in the fringe (vc-gutter +pretty) ; vcs diff in the fringe
vi-tilde-fringe ; fringe tildes to mark beyond EOB vi-tilde-fringe ; fringe tildes to mark beyond EOB
(which-key +popup) ; key binding popups
window-select ; visually switch windows window-select ; visually switch windows
workspaces ; tab emulation, persistence & separate workspaces workspaces ; tab emulation, persistence & separate workspaces
zen ; distraction-free coding or writing zen ; distraction-free coding or writing
+10
View File
@@ -54,6 +54,16 @@
(package! claudemacs (package! claudemacs
:recipe (:host github :repo "cpoile/claudemacs")) :recipe (:host github :repo "cpoile/claudemacs"))
;; Terminal emulator
(package! eat
:recipe (:host codeberg
:repo "akib/emacs-eat"
:files ("*.el" ("term" "term/*.el") "*.texi"
"*.ti" ("terminfo/e" "terminfo/e/*")
("terminfo/65" "terminfo/65/*")
("integration" "integration/*")
(:exclude ".dir-locals.el" "*-tests.el"))))
;; Usage metrics and key tracking ;; Usage metrics and key tracking
(package! keyfreq) (package! keyfreq)
(package! command-log-mode) (package! command-log-mode)
+6 -3
View File
@@ -9,11 +9,14 @@
(use-package! ewal-doom-themes (use-package! ewal-doom-themes
:config :config
(load-theme 'ewal-doom-one t) ;; (load-theme 'ewal-doom-one t)
(enable-theme 'ewal-doom-one)) ;;(enable-theme 'ewal-doom-one)
)
;; Set the theme to ewal-doom-one ;; Set the theme to ewal-doom-one
(setq doom-theme 'ewal-doom-one) ;; (setq doom-theme 'ewal-doom-one)
(load-theme 'doom-one t)
(setq doom-theme 'doom-one)
;; Previous base16 config (commented out) ;; Previous base16 config (commented out)
;; (setq base16-distinct-fringe-background t ;; (setq base16-distinct-fringe-background t