refactor: improve cross-platform and theme consistency

lisp/init-dired.el

@@ -117,6 +117,7 @@
 	trashed-date-format "%Y-%m-%d %H:%M:%S"))
 
 ;; discomfort，挂载硬盘
+(when *is-linux*
   (use-package debase
     :straight
     (debase :type git
@@ -128,7 +129,7 @@
     :straight
     (discomfort :type git
 		:host codeberg
-		:repo "emacs-weirdware/discomfort"))
+		:repo "emacs-weirdware/discomfort")))
 
 (provide 'init-dired)
 

lisp/init-exwm.el

@@ -147,6 +147,17 @@
 	(setq consult-buffer-sources
 	      (append consult-buffer-sources '(xdg-launcher-consult-source)))))))
 
+(when *is-mac*
+  ;; launcher
+  (use-package launcher
+    :straight
+    (launcher
+     :type git
+     :host github
+     :repo "xiaoxinghu/launcher.el")
+    :bind
+    ("s-SPC" . launcher)))
+
 (provide 'init-exwm)
 
 ;;; init-exwm.el ends here

lisp/init-prog.el

@@ -1,4 +1,4 @@
-;;; init.el --- init.el  -*- lexical-binding: t -*-
+;;; init-prog.el --- programming  -*- lexical-binding: t -*-
 
 ;;; Commentary:
 

lisp/init-ui.el

@@ -100,10 +100,8 @@
 (use-package time
   :if
   (not *is-android*)
-  :init
-  (if *is-linux*
-      (add-hook 'exwm-wm-mode-hook 'display-time-mode)
-    (add-hook 'after-init-hook 'display-time-mode))
+  :hook
+  (persp-mode . display-time-mode)
   :config
   (setq display-time-default-load-average nil
 	display-time-string-forms

lisp/init-window.el

@@ -38,6 +38,7 @@
           "\\*Edit Annotation.*\\*"
           "\\*Flutter\\*"
           "\\*Ibuffer\\*"
+	  "^\\*Finder-"
           "Buffers\\*$"
           "^\\*Geiser"
           "\\*gptel-Kimi-Code\\*"

lisp/my-base16-dark-theme.el

@@ -59,9 +59,9 @@
      `(dired-async-mode-message ((,class (:foreground ,red))))
      `(dired-async-message ((,class (:foreground ,yellow))))
      `(consult-file ((,class (:foreground ,green))))
-     `(consult-notes-name ((,class (:foreground ,base01 :weight bold))))
-     `(consult-notes-time ((,class (:foreground ,base01 :weight thin))))
-     `(consult-notes-size ((,class (:foreground ,base01 :weight thin))))
+     `(consult-notes-name ((,class (:foreground ,base01))))
+     `(consult-notes-time ((,class (:foreground ,base01))))
+     `(consult-notes-size ((,class (:foreground ,base01))))
      `(denote-faces-keywords ((,class (:foreground ,cyan))))
      `(mode-line ((,class (:foreground ,base0 :background ,base02))))
      `(mode-line-inactive ((,class (:foreground ,base01 :background ,base03))))

lisp/my-base16-light-theme.el

@@ -18,6 +18,7 @@
   my-base16-light-core-palette
   '((custom-theme-set-faces
      theme-name
+     `(italic ((,class (:slant italic))))
      `(org-level-1 ((,class (:foreground ,orange :height 1.0 :weight normal))))
      `(org-level-2 ((,class (:foreground ,blue :height 1.0 :weight normal))))
      `(org-level-3 ((,class (:foreground ,green :height 1.0 :weight normal))))
@@ -58,9 +59,9 @@
      `(dired-async-mode-message ((,class (:foreground ,red))))
      `(dired-async-message ((,class (:foreground ,yellow))))
      `(consult-file ((,class (:foreground ,green))))
-     `(consult-notes-name ((,class (:foreground ,base01 :weight bold))))
-     `(consult-notes-time ((,class (:foreground ,base01 :weight thin))))
-     `(consult-notes-size ((,class (:foreground ,base01 :weight thin))))
+     `(consult-notes-name ((,class (:foreground ,base01))))
+     `(consult-notes-time ((,class (:foreground ,base01))))
+     `(consult-notes-size ((,class (:foreground ,base01))))
      `(denote-faces-keywords ((,class (:foreground ,cyan))))
      `(mode-line ((,class (:foreground ,base0 :background ,base02))))
      `(mode-line-inactive ((,class (:foreground ,base01 :background ,base03))))