e2a352709c
Add Android/Termux support with `*is-android*` constant and conditional GUI/terminal initialization. Remove maximized frame defaults and custom.el. Replace corfu with corfu-terminal in TTY. Add god-mode to terminal config with line number sync. Update org agenda to use org-ql blocks with super-agenda grouping. Switch solarized-theme to fork. Clean up redundant functions and unify keyboard bindings across environments.
45 lines
1.6 KiB
EmacsLisp
45 lines
1.6 KiB
EmacsLisp
;;; init-const.el --- constant and system stuff -*- lexical-binding: t -*-
|
|
|
|
;;; Commentary:
|
|
|
|
;;; Code:
|
|
|
|
;; 识别操作系统
|
|
(defconst *is-mac* (eq system-type 'darwin))
|
|
(defconst *is-linux* (eq system-type 'gnu/linux))
|
|
(defconst *is-windows* (or (eq system-type 'ms-dos)
|
|
(eq system-type 'windows-nt)))
|
|
(defconst *is-android* (if (getenv "TERMUX_VERSION") t nil))
|
|
|
|
(if *is-windows*
|
|
(progn
|
|
;; 设置默认编码环境
|
|
(set-language-environment "UTF-8")
|
|
(prefer-coding-system 'utf-8)
|
|
(set-default-coding-systems 'utf-8)
|
|
(set-terminal-coding-system 'utf-8)
|
|
(set-keyboard-coding-system 'utf-8)
|
|
(setq default-buffer-file-coding-system 'utf-8)
|
|
|
|
;; 设置进程通信编码
|
|
(setq default-process-coding-system '(utf-8 . utf-8))
|
|
|
|
;; Windows 文件名 Unicode 支持
|
|
(setq w32-unicode-filenames t)
|
|
(setq w32-system-coding-system 'utf-8)
|
|
|
|
;; 为特定程序设置编码
|
|
(add-to-list 'process-coding-system-alist '("rg" utf-8 . gbk))
|
|
(add-to-list 'process-coding-system-alist '("ripgrep" utf-8 . gbk)))
|
|
(progn
|
|
(add-to-list 'process-coding-system-alist '("rg" utf-8 . utf-8))
|
|
(add-to-list 'process-coding-system-alist '("ripgrep" utf-8 . utf-8))))
|
|
(add-to-list 'process-coding-system-alist '("grep" utf-8 . utf-8))
|
|
(add-to-list 'process-coding-system-alist '("find" utf-8 . utf-8))
|
|
(add-to-list 'process-coding-system-alist '("fd" utf-8 . utf-8))
|
|
(add-to-list 'process-coding-system-alist '("fdfind" utf-8 . utf-8))
|
|
|
|
(provide 'init-const)
|
|
|
|
;;; init-const.el ends here
|