Config: optimize completion config and custom theme color

lisp/init-completion.el

@@ -13,9 +13,6 @@
 
 ;; corfu
 (use-package corfu
-  :custom
-  (corfu-cycle t) ;; Enable cycling for `corfu-next/previous'
-
   :init
   (global-corfu-mode)
   (corfu-history-mode)
@@ -23,8 +20,12 @@
   (corfu-echo-mode)
 
   :custom
-  (corfu-popupinfo-delay 0.5)
   (corfu-auto t)
+  (corfu-cycle t)
+  (corfu-auto-delay 0.1)
+  (corfu-popupinfo-delay 0.2)
+  (corfu-preview-current nil)
+  (corfu-auto-prefix 2)
 
   :bind
   (:map corfu-map

lisp/init-ui.el

@@ -44,7 +44,7 @@
 
 ;; 安装solarized dark
 (use-package solarized-theme)
-(load-theme 'my-base16-dark)
+(load-theme 'my-base16-dark t)
 
 ;; 很多主题
 (use-package doom-themes)

lisp/my-base16-dark-theme.el

@@ -24,7 +24,8 @@
      `(org-level-8 ((,class (:foreground ,green))))
      `(org-priority ((,class (:foreground ,blue :weight bold))))
      `(org-done ((,class (:foreground ,blue :weight bold))))
-     `(org-headline-done ((,class (:foreground ,blue)))))))
+     `(org-headline-done ((,class (:foreground ,blue))))
+     `(vertico-current ((,class (:background ,base02 :extend t :underline nil)))))))
 
 (provide-theme 'my-base16-dark)
 

lisp/my-base16-palette.el

@@ -10,7 +10,7 @@
     "#E3FCFB"   ; brightest-base: 最亮前景
     "#A87C04"   ; yellow: 黄色
     "#C24713"   ; orange: 橙色
-    "#BF2926"   ; red: 红色
+    "#CE2825"   ; red: 红色
     "#d33682"   ; magenta: 品红
     "#6c71c4"   ; violet: 紫罗兰
     "#2570CD"   ; blue: 蓝色