我还是放不下Emacs！

前言 难受，真难受呀。作为一个痴迷Vim的人，总是被Emacs的强大勾引，看见别人配的酷炫全能的Emacs就走不动路，脑子里想着“没事没事，我Vim轻量启动极快，Emacs这种重量级是比不上的”，自我安慰。实际上多想玩Emacs只有我自己知道…… 我之前也试过配Emacs，但是Windows搞出来的不伦不类还很卡的东西太难受，用WSL尝试了一下Spacemacs，搞不明白那个层机制，也对ELisp这个语言不熟悉（说实话到现在Lua的一些东西我都不明白），而且之前的配置也一直想一口吃个大胖子，一天内就配到IDE的强大程度，经过几次失败和Vim配置经验后，我深知这是不可能的，除非在我使用Emacs后N周年的第N周目重新删干净再配，也许能做到。 定个小目标吧，每天配一点点，成果起码要达到以下程度： 能胜任前端、Nodejs的开发 能胜任CPP/C的开发 能使用EAF浏览网页 有一点花里胡哨的小功能 其实我也挺想把博客迁移到Emacs，完全用org-mode来写，Hexo越来越慢。其实Hugo也不是不行，就是不太熟悉也不喜欢Go。看了刘家财大佬的博客后感觉这个也太酷了，主题我也很喜欢，但是评论功能可能有点折腾，我对评论系统也有点不太在意。最难割舍的是现在用的这个主题…… 刘家财老师是这样说的 只不过遗憾的是，即使写了近 10 年的博客，有价值的评论少之又少，可能中文互联网内没多少人认真写技术评论吧。 这点我确实认同，观察了一些博客的评论，真正讨论技术内容的没几个，大多都是在围观、附和。但是我的博客类型也不能算是纯技术博客，保持与读者的互动还是很有意思的。 言归正传，我现在的Emacs在WSL里，装的是Spacemacs，能正常用eaf，但是写代码很难受，也没有补全，可以说现在它只能当一个浏览器用，我准备推翻重新配。 那么，从现在开始，来配Emacs！！！ 与过去挥手 在rm -rf ~/.emacs.d后，那个不伦不类、上不去下不来的Emacs彻底成为了历史。重新输入Emacs，又看到熟悉又陌生的丑陋开屏页。 小插曲 WSLg间歇性抽风，打不开GUI Display 10.255.255.254:0 unavailable, simulating -nw 打开管理员Powershell，运行wsl --update ![[public/images/我还是放不下Emacs！/Pasted image 20250603210050.png]] 我草，怎么这么慢？？ MELPA配置 (require 'package) (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t) (package-initialize) 切换中国镜像源 (require 'package) (setq package-archives '(("gnu" . "http://mirrors.cloud.tencent.com/elpa/gnu/") ("melpa" . "http://mirrors.cloud.tencent.com/elpa/melpa/"))) (package-initialize) 重启Emacs，输入package-list-packages就可以查看所有插件。package-install，回车输入插件名就可以安装对应插件。 默认情况下，插件会被安装到 ~/.emacs.d/elpa/ 目录下。 use-package 输入package-install，输入use-package，回车安装，然后在init.el中写 (eval-when-compile (require 'use-package)) ivy (use-package ivy :ensure t :init (ivy-mode 1) (counsel-mode 1) :config (setq ivy-use-virtual-buffers t) (setq search-default-mode #'char-fold-to-regexp) (setq ivy-count-format "(%d/%d) ") :bind (("C-s" . 'swiper) ("C-x b" . 'ivy-switch-buffer) ("C-c v" . 'ivy-push-view) ("C-c s" . 'ivy-switch-view) ("C-c V" . 'ivy-pop-view) ("C-x C-@" . 'counsel-mark-ring); 在某些终端上 C-x C-SPC 会被映射为 C-x C-@，比如在 macOS 上，所以要手动设置 ("C-x C-SPC" . 'counsel-mark-ring) :map minibuffer-local-map ("C-r" . counsel-minibuffer-history))) amx (use-package amx :ensure t :init (amx-mode)) ace-window (use-package ace-window :ensure t :bind (("C-x o" . 'ace-window))) mwim (use-package mwim :ensure t :bind ("C-a" . mwim-beginning-of-code-or-line) ("C-e" . mwim-end-of-code-or-line)) undo-tree (use-package undo-tree :ensure t :init (global-undo-tree-mode) :custom (undo-tree-auto-save-history nil)) smart-mode-line (use-package smart-mode-line :ensure t :init (sml/setup)) good-scroll (use-package good-scroll :ensure t :if window-system ; 在图形化界面时才使用这个插件 :init (good-scroll-mode)) 今天就先到这里吧。