diff options
| author | verdant <i@glowisle.me> | 2026-05-02 00:17:22 +0800 |
|---|---|---|
| committer | verdant <i@glowisle.me> | 2026-05-02 00:17:22 +0800 |
| commit | 2fb72671c096779830912dbe84ba704ce695d879 (patch) | |
| tree | 39f6016e277f35e674c50f51ed6c819eeefeb2aa /core/core-basic.el | |
| parent | 6c38d42f1a17fee4d9ead9d146e88620cf780ec7 (diff) | |
| download | vemacs-2fb72671c096779830912dbe84ba704ce695d879.tar.gz vemacs-2fb72671c096779830912dbe84ba704ce695d879.zip | |
refactor: migrate configuration to a single org-mode file
Diffstat (limited to 'core/core-basic.el')
| -rw-r--r-- | core/core-basic.el | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/core/core-basic.el b/core/core-basic.el deleted file mode 100644 index ce5375d..0000000 --- a/core/core-basic.el +++ /dev/null @@ -1,54 +0,0 @@ -;; -*- lexical-binding: t; -*- - -(setq confirm-kill-emacs #'yes-or-no-p ; 关闭 Emacs 时询问 y or n - auto-save-visited-interval 5 - native-comp-async-report-warinings-errors nil - backup-directory-alist `((".*" . ,temporary-file-directory)) - auto-save-file-name-transforms `((".*" ,temporary-file-directory t)) - select-enable-clipboard t - select-enable-primary t - interprogram-cut-function - (lambda (text &optional push) - (let ((process-connection-type nil)) - (let ((proc (start-process "xclip" nil "xclip" "-selection" "clipboard"))) - (process-send-string proc text) - (process-send-eof proc)))) - interprogram-paste-function - (lambda () - (shell-command-to-string "xclip -o -selection clipboard"))) - -(setq-default delete-by-moving-to-transh t ; 删除文件移动到垃圾箱 - window-combination-resize t ; 新窗口平均其他左右窗口 - x-stretch-cursor t ; 将光标拉伸到字符宽度 - ) - -(defun my/keyboard-escape-quit() - "快速的 Esc 退出 minibuffer" - (interactive) - (keyboard-escape-quit)) - -(global-set-key (kbd "<escape>") #'my/keyboard-escape-quit) - -;; 在 Dired 中,按`l`进入文件,按`h`回到上一级目录 -(add-hook 'evil-mode-hook (lambda () -(with-eval-after-load 'dired - (add-hook 'dired-mode-hook - (lambda () - (define-key evil-normal-state-local-map (kbd "h") nil) - (define-key evil-normal-state-local-map (kbd "l") nil) - (define-key evil-normal-state-local-map (kbd "h") #'dired-up-directory) - (define-key evil-normal-state-local-map (kbd "l") #'dired-find-file)))))) - - (add-hook 'dired-mode-hook - (lambda () - (define-key dired-mode-map (kbd "C-b") nil) - (define-key dired-mode-map (kbd "C-f") nil) - (define-key dired-mode-map (kbd "C-b") #'dired-up-directory) - (define-key dired-mode-map (kbd "C-f") #'dired-find-file))) - -(global-set-key (kbd "<escape>") #'my/keyboard-escape-quit) - -(global-auto-revert-mode t) ; 另一程序修改文件让 Emacs 及时刷新 Buffer -(auto-save-mode 1) - -(provide 'core-basic) |
