*scratch* 默认开启 lexical-binding

感觉 lexical-binding 默认就该开着,自动在 *scratch* 中开启 lexical-binding

(add-hook 'emacs-startup-hook
          (defun chunyang-enable-lexical-binding ()
            (let ((buffer (get-buffer "*scratch*")))
              (when buffer
                (with-current-buffer buffer
                  (setq lexical-binding t))))))

至于其它的 M-: (eval-expression) 等就不管了。