admin/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

style: Convert tabs to spaces across Emacs config

Browse Source
This commit is contained in:
User
2026-07-02 17:36:06 +08:00
parent abe00aa936
commit ddd2ba4905
24 changed files with 384 additions and 379 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
lisp/init-ui.el
View File

@@ -18,11 +18,11 @@
;; 把主题加载延迟到frame创建之后，防止daemon模式下宏不能正常展开
(if (and (daemonp) (not *is-android*))
(add-hook 'after-make-frame-functions
(lambda (frame)
(with-selected-frame frame
(load-theme 'my-dark t))))
(lambda (frame)
(with-selected-frame frame
(load-theme 'my-dark t))))
(if *is-android*
(load-theme 'my-light t)
(load-theme 'my-light t)
(load-theme 'my-dark t))))
;; 行号
@@ -31,8 +31,8 @@
(after-init . global-display-line-numbers-mode)
:config
(setq display-line-numbers-type '2
display-line-numbers-grow-only t
display-line-numbers-width-start 4))
display-line-numbers-grow-only t
display-line-numbers-width-start 4))
;; org-mode美化
(use-package olivetti
@@ -87,12 +87,12 @@
(persp-mode . display-time-mode)
:config
(setq display-time-default-load-average nil
display-time-string-forms
'((propertize
(concat
(propertize (format-time-string " %I:%M") 'face 'display-time-date-and-time)
(propertize (format-time-string "-%p") 'face 'font-lock-comment-face))
'help-echo (format-time-string "%A, %B %d, %Y"))))))
display-time-string-forms
'((propertize
(concat
(propertize (format-time-string " %I:%M") 'face 'display-time-date-and-time)
(propertize (format-time-string "-%p") 'face 'font-lock-comment-face))
'help-echo (format-time-string "%A, %B %d, %Y"))))))
;; 安装cnfonts，修复中英文对齐
(use-package cnfonts
@@ -100,11 +100,11 @@
(after-init . cnfonts-mode)
:init
(setq cnfonts-personal-fontnames
'(("Sarasa Fixed TC") ;英文
("Sarasa Fixed TC") ;中文
nil ;ext-B
nil ;symbol
nil)) ;装饰
'(("Sarasa Fixed TC") ;英文
("Sarasa Fixed TC") ;中文
nil ;ext-B
nil ;symbol
nil)) ;装饰
:config
(cnfonts--select-profile "profile1"))