现在Emacs的Home目录会随机生成了， default-directory等已经不起作用了，查找了网上各种方法。 下面这种方法是最方便的
在控制台（cmd）中执行下面的命令：
SETX EMACS_HOME "D:\Documents\Programming\emacshome"
添加环境变量（这里是用户变量）或手动添加环境变量（系统变量也可以），这里的变量名EMACS_HOME可自己决定，在emacs\share\emacs\site-lisp文件夹下新建site-start.el，写入：
; X：\Program_Files\Emacs\share\emacs\site-lisp
(setenv "HOME" (convert-standard-filename (getenv "EMACS_HOME")))