Emacs配置出错时如何加载历史正常配置并显示错误信息？

可以通过以下两步实现需求：

1. 开启配置文件自动版本化备份 #

先在配置中开启自动备份功能，确保每次修改配置都会生成独立的历史备份文件：

;; 启用配置文件备份
(setq make-backup-files t)
;; 指定备份文件存放目录
(setq backup-directory-alist '(("." . "~/.emacs.d/backups/")))
;; 开启版本控制，每个修改生成独立备份文件
(setq version-control t)
;; 自动创建备份目录（不存在时）
(make-directory "~/.emacs.d/backups/" t)

2. 配置错误捕获与自动加载备份 #

创建启动引导文件~/.emacs.d/boot.el，用condition-case捕获配置加载错误，自动加载最新备份并显示错误信息：

(defun load-latest-backup-init ()
  ;; 筛选并排序init.el的备份文件，取最新版本
  (let ((backup-files (directory-files "~/.emacs.d/backups/" t "init.el\\.~.*~")))
    (when backup-files
      (setq backup-files (sort backup-files #'file-newer-than-file-p))
      (let ((latest-backup (car backup-files)))
        (load-file latest-backup)
        (message "配置加载失败，已自动切换至最新备份: %s" latest-backup)))))

;; 尝试加载主配置，出错则触发备份加载逻辑
(condition-case err
    (load-file "~/.emacs.d/init.el")
  (error
   (load-latest-backup-init)
   ;; 在minibuffer显示错误详情
   (message "配置错误详情: %s" err)
   ;; 弹出警告框提示
   (warn "Emacs配置出错！已切换至备份配置，错误信息: %s" err)))

最后修改~/.emacs文件，让Emacs启动时优先加载引导文件：

(load-file "~/.emacs.d/boot.el")

此后调试配置出错时，Emacs会自动加载最近一次的可用备份，同时在minibuffer和警告框中给出明确错误提示，方便定位问题。

内容的提问来源于stack exchange，提问作者Refael Sheinker