mirror of
https://github.com/js0ny/dotfiles.git
synced 2025-12-21 00:33:00 +00:00
100 lines
2.8 KiB
EmacsLisp
100 lines
2.8 KiB
EmacsLisp
;;; init-edit.el
|
|
|
|
;; Use UTF-8 & LF
|
|
(setq-default buffer-file-coding-system 'utf-8-unix)
|
|
|
|
;; Auto input pairred brackets
|
|
(electric-pair-mode 1)
|
|
|
|
;; Enable Folding
|
|
(add-hook 'prog-mode-hook #'hs-minor-mode)
|
|
|
|
;; Company - Complete Anything
|
|
(use-package company
|
|
:ensure t
|
|
:hook (after-init . global-company-mode) ; 在启动后自动启用 global-company-mode
|
|
:bind (:map company-active-map
|
|
("C-n" . company-select-next)
|
|
("C-p" . company-select-previous))
|
|
:custom
|
|
(company-minimum-prefix-length 1) ; 设置最短补全前缀
|
|
(company-idle-delay 0.2)) ; 设置补全延迟（秒）
|
|
|
|
;; minibuffer 补全增强
|
|
(use-package vertico
|
|
:init
|
|
(vertico-mode))
|
|
|
|
;; 提供补全注解
|
|
(use-package marginalia
|
|
:init
|
|
(marginalia-mode))
|
|
|
|
|
|
;; (set-language-environment "UTF-8")
|
|
(set-default-coding-systems 'utf-8)
|
|
;; (prefer-coding-system 'utf-8)
|
|
|
|
;;; 设置语言环境为 UTF-8
|
|
;
|
|
;;; 强制使用 UTF-8
|
|
;(set-terminal-coding-system 'utf-8)
|
|
;(set-keyboard-coding-system 'utf-8)
|
|
;
|
|
;;; Windows 系统特殊设置
|
|
;(when (eq system-type 'windows-nt)
|
|
; (set-file-name-coding-system 'gbk) ;; 文件名使用 GBK
|
|
; (set-clipboard-coding-system 'utf-16le)) ;; 剪贴板使用 UTF-16LE
|
|
;
|
|
;(setq-default buffer-file-coding-system 'utf-8-unix)
|
|
;
|
|
;;; 设置行尾为 Unix 风格
|
|
;(add-hook 'find-file-hook 'find-file-check-line-endings)
|
|
;
|
|
;(defun dos-file-endings-p ()
|
|
; (string-match "dos" (symbol-name buffer-file-coding-system)))
|
|
;
|
|
;(defun find-file-check-line-endings ()
|
|
; (when (dos-file-endings-p)
|
|
; (set-buffer-file-coding-system 'undecided-unix)
|
|
; (set-buffer-modified-p nil)))
|
|
|
|
(setq-default buffer-file-coding-system 'utf-8-unix)
|
|
|
|
;; Avy - act like Vim Easymotion
|
|
(use-package avy
|
|
:ensure t
|
|
:config
|
|
(evil-define-key '(normal) 'global (kbd "T") 'avy-goto-char)
|
|
(evil-define-key '(normal) 'global (kbd "s") 'avy-goto-char-2)
|
|
(evil-define-key '(normal) 'global (kbd "s") 'avy-goto-char-2-above))
|
|
|
|
(use-package yasnippet
|
|
:ensure t
|
|
:defer t
|
|
:commands yas-minor-mode
|
|
:hook ((prog-mode . yas-minor-mode)
|
|
(org-mode . yas-minor-mode))
|
|
:config
|
|
(setq yas-indent-line 'fixed) ;; 让 snippet 展开时不影响缩进
|
|
(setq yas-wrap-around-region nil) ;; 关闭自动包裹选中区域
|
|
(advice-add 'yas-expand-snippet :around
|
|
(lambda (orig-fn &rest args)
|
|
(let ((inhibit-field-text-motion t)) ;; 禁止字段自动换行
|
|
(apply orig-fn args))))
|
|
;; (setq yas-snippet-dirs '("~/.dotfiles/tools/doom/snippets/"))
|
|
(add-to-list 'yas-snippet-dirs "~/.dotfiles/tools/doom/snippets/" t)
|
|
|
|
(yas-reload-all)
|
|
)
|
|
|
|
(use-package diff-hl
|
|
:straight t
|
|
:hook ((prog-mode . diff-hl-mode)
|
|
(vc-dir-mode . diff-hl-dir-mode)
|
|
(magit-post-refresh . diff-hl-magit-post-refresh))
|
|
:config
|
|
(setq diff-hl-margin-mode nil)
|
|
(diff-hl-flydiff-mode))
|
|
|
|
(provide 'init-edit)
|