From c45c46d8f3dfce88de757acfe6bf78f2a3132a99 Mon Sep 17 00:00:00 2001
From: andsy10 <andsy1016@gmail.com>
Date: Wed, 6 May 2026 18:39:21 +0800
Subject: [PATCH] Config: install eat.

---
 lisp/init-completion.el  |  1 -
 lisp/init-emms.el        |  7 -------
 lisp/init-kbd-func.el    | 12 ++++++++++++
 lisp/init-org.el         |  9 ---------
 lisp/init-package.el     | 18 ++++++++++++++++--
 lisp/init-prog.el        |  3 ---
 lisp/init-terminal-ui.el |  2 +-
 7 files changed, 29 insertions(+), 23 deletions(-)

diff --git a/lisp/init-completion.el b/lisp/init-completion.el
index 2fe2b48..908443a 100644
--- a/lisp/init-completion.el
+++ b/lisp/init-completion.el
@@ -47,7 +47,6 @@
   ;;Quit completion before saving
   (add-hook 'before-save-hook #'corfu-quit)
   (advice-add #'persistent-scratch-save :before #'corfu-quit)
-
   :bind   (:map corfu-map
 	            ("RET" . nil)))
 
diff --git a/lisp/init-emms.el b/lisp/init-emms.el
index 702835f..494e291 100644
--- a/lisp/init-emms.el
+++ b/lisp/init-emms.el
@@ -93,13 +93,6 @@
           (lambda ()
             (setq emms-single-track t))))
 
-;; 提供 EMMS 快捷启动函数
-(defun my-emms-start-browser ()
-  "Open emms browser."
-  (interactive)
-  (emms-browser)
-  (message "EMMS browser loaded"))
-
 (defun my-emms-play-directory (dir)
   "Play all files in directory.."
   (interactive "Dchoose a directory: ")
diff --git a/lisp/init-kbd-func.el b/lisp/init-kbd-func.el
index 7ecdf59..bb6dc49 100644
--- a/lisp/init-kbd-func.el
+++ b/lisp/init-kbd-func.el
@@ -99,6 +99,18 @@ Disable jinx-mode if it's enable and global-jinx-mode is disable , otherwise tog
   (org-journal-new-entry nil)
   (delete-other-windows))
 
+(defun org-table-align-all ()
+  "Ajust all table in current buffer."
+  (interactive)
+  (save-excursion
+    (goto-char (point-min))
+    (org-table-map-tables 'org-table-align t)))
+
+(defun org-align-description-list ()
+  "Ajust all `::' in active region. "
+  (interactive)
+  (align-regexp (region-beginning) (region-end) "\\(\\s-*\\)::" 1 1 nil))
+
 (defun switch-to-emms-playlist()
   "Switch to emms playlist."
   (interactive)
diff --git a/lisp/init-org.el b/lisp/init-org.el
index f2bc9ee..de5282b 100644
--- a/lisp/init-org.el
+++ b/lisp/init-org.el
@@ -65,15 +65,6 @@
 (setq org-agenda-skip-function-global
       '(org-agenda-skip-entry-if 'todo '("COMMENT")))
 
-
-;; 批量调整表格
-(defun org-table-align-all ()
-  "Ajust all table in current buffer."
-  (interactive)
-  (save-excursion
-    (goto-char (point-min))
-    (org-table-map-tables 'org-table-align t)))
-
 ;; org-babel scheme
 (use-package ob-scheme
   :straight (:type built-in)
diff --git a/lisp/init-package.el b/lisp/init-package.el
index 4f66c84..be75575 100644
--- a/lisp/init-package.el
+++ b/lisp/init-package.el
@@ -40,7 +40,7 @@
 
 ;; 安装vertico
 (use-package vertico
-  :init (vertico-mode t))
+  :init (vertico-mode))
 
 ;; 安装orderless，用于模糊搜索
 (use-package orderless
@@ -241,7 +241,21 @@ targets."
   (use-package vterm))
 
 ;; eat
-(use-package eat)
+(use-package eat
+  :straight (eat :type git
+                 :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")))
+  :hook ((eshell-load . eat-eshell-mode)
+         (eshell-load . eat-eshell-visual-command-mode))
+  :config (setq eat-term-terminfo-directory eat--terminfo-path))
 
 ;; general
 (use-package general)
diff --git a/lisp/init-prog.el b/lisp/init-prog.el
index cb27a2f..eccbb49 100644
--- a/lisp/init-prog.el
+++ b/lisp/init-prog.el
@@ -18,9 +18,6 @@
   :config
   (add-to-list 'auto-mode-alist '("\\.lua\\'" . lua-ts-mode)))
 
-;; ahk
-(use-package ahk-mode)
-
 ;; scheme
 (use-package geiser
   :config
diff --git a/lisp/init-terminal-ui.el b/lisp/init-terminal-ui.el
index 4ebd53f..54653bd 100644
--- a/lisp/init-terminal-ui.el
+++ b/lisp/init-terminal-ui.el
@@ -17,7 +17,7 @@
     (prefer-coding-system 'utf-8)))
 
 ;; 主题
-(load-theme 'tango-dark)
+;; (load-theme 'tango-dark)
 
 ;; 显示文件大小
 (size-indication-mode t)