使用after-init-hook的理由是什么？

[zhouchongzxc]

给我的scratch做下广告

用*scratch*保存配置

把下面的代码放进配置文件 (setq initial-scratch-message "") (setq initial-buffer-choice '(lambda () (let ((buf (get-buffer-create "*scratch*")) (file "~/.emacs.d/scratch.el")) (with-current-buffer buf (insert-file-contents file) (local-set-key "\C-x\C-s" '(lambda () (interactive) (let ((str (buffer-string))) (with-current-buffer (find-fi…