Config: add light version of my-base16 theme.

lisp/init-kbd.el

@@ -123,7 +123,7 @@
 ;; vterm
 (general-def vterm-mode-map
   "M-]" nil
-  "C-x C-x" 'vterm-send-C-x)
+  "C-q" 'vterm-send-next-key)
 
 ;; embark
 (general-def embark-file-map
@@ -142,7 +142,8 @@
 (general-def org-mode-map
   "C-<tab>" 'org-cycle-current-subtree
   "C-c i" 'consult-org-heading
-  "C-c o w" 'my-org-refile-to-new-file)
+  "C-c o w" 'my-org-refile-to-new-file
+  "C-c o l" 'org-toggle-link-display)
 
 ;; emms
 (general-def emms-playlist-mode-map

lisp/init-org.el

@@ -29,8 +29,9 @@
 	          (message "Org preloaded")))))
 
 ;; 设置标题字体大小
-;; (dolist (face org-level-faces)
-;; (set-face-attribute face nil :height 1))
+;; (with-eval-after-load 'org
+;;   (dolist (face org-level-faces)
+;;     (set-face-attribute face nil :height 1)))
 
 ;; log默认放入drawer中
 (setq org-log-done t)

lisp/my-base16-dark-theme.el

@@ -24,7 +24,10 @@
      `(org-level-8 ((,class (:foreground ,blue))))
      `(org-done ((,class (:foreground ,green :weight bold))))
      `(org-headline-done ((,class (:foreground ,green))))
+     `(org-block-begin-line ((,class (:foreground ,base01 :underline t :slant italic :extend t))))
+     `(org-block-end-line ((,class (:foreground ,base01 :overline t :slant italic :extend t))))
      `(org-priority ((,class (:foreground ,green :weight bold))))
+     `(org-checkbox ((,class (:foreground ,base0 :weight bold))))
      `(font-lock-keyword-face ((,class (:foreground ,cyan :weight bold))))
      `(font-lock-doc-face ((,class (:foreground ,green :slant normal))))
      `(font-lock-string-face ((,class (:foreground ,green))))

lisp/my-base16-light-theme.el

@@ -0,0 +1,45 @@
+;;; my-base16-light-theme.el --- Base16 Light Theme  -*- lexical-binding: t -*-
+
+;;; Commentary:
+;; A green base16 light theme base on solarized-theme
+
+;;; Code:
+
+(require 'solarized)
+(require 'my-base16-palette)
+(eval-when-compile
+  (require 'solarized-palettes))
+
+(deftheme my-base16-light "A Base16 light theme using Solarized framework.")
+
+(solarized-with-color-variables-with-palette
+    'light
+    'my-base16-light
+  my-base16-light-core-palette
+  '((custom-theme-set-faces
+     theme-name
+     `(org-level-2 ((,class (:foreground ,green :height 1.05))))
+     `(org-level-3 ((,class (:foreground ,blue))))
+     `(org-level-6 ((,class (:foreground ,green))))
+     `(org-level-8 ((,class (:foreground ,blue))))
+     `(org-done ((,class (:foreground ,green :weight bold))))
+     `(org-headline-done ((,class (:foreground ,green))))
+     `(org-block-begin-line ((,class (:foreground ,base01 :underline t :slant italic :extend t))))
+     `(org-block-end-line ((,class (:foreground ,base01 :overline t :slant italic :extend t))))
+     `(org-priority ((,class (:foreground ,green :weight bold))))
+     `(font-lock-keyword-face ((,class (:foreground ,cyan :weight bold))))
+     `(font-lock-doc-face ((,class (:foreground ,green :slant normal))))
+     `(font-lock-string-face ((,class (:foreground ,green))))
+     `(dashboard-footer-face ((,class (:foreground ,blue))))
+     `(dashboard-text-banner ((,class (:foreground ,green))))
+     `(dashboard-heading ((,class (:foreground ,green :weight bold))))
+     `(dirvish-file-time ((,class (:foreground ,base01))))
+     `(dired-header ((,class (:foreground ,green))))
+     `(mode-line ((,class (:foreground ,base0 :background ,base02))))
+     `(mode-line-inactive ((,class (:foreground ,base01 :background ,base03))))
+     `(jinx-misspelled ((,class (:underline (:style dashes :color ,yellow)))))
+     `(vertico-current ((,class (:background ,base02 :extend t :underline nil)))))))
+
+(provide-theme 'my-base16-light)
+
+;;; my-base16-light-theme.el ends here

lisp/my-base16-palette.el

@@ -17,6 +17,18 @@
     "#01928D"   ; cyan: 青色
     "#3A9C36")) ; green: 绿色
 
+(defvar my-base16-light-core-palette
+  '("#062617"   ; darkest-base: 最深背景
+    "#E3FFE6"   ; brightest-base: 最亮前景
+    "#A87C04"   ; yellow: 黄色
+    "#C24713"   ; orange: 橙色
+    "#CE2825"   ; red: 红色
+    "#d33682"   ; magenta: 品红
+    "#6c71c4"   ; violet: 紫罗兰
+    "#2570CD"   ; blue: 蓝色
+    "#01928D"   ; cyan: 青色
+    "#3A9C36")) ; green: 绿色
+
 (provide 'my-base16-palette)
 
 ;;; my-base16-palette.el ends here