From f7c94f43045af255bfc735fe467beddc2947bc17 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 13 Jun 2007 00:03:49 +0000 Subject: [PATCH] (shell): Use user-emacs-directory. --- lisp/shell.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/shell.el b/lisp/shell.el index a218981256a..9e07540d9d8 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -557,7 +557,7 @@ Otherwise, one argument `-i' is passed to the shell. (startfile (concat "~/.emacs_" name)) (xargs-name (intern-soft (concat "explicit-" name "-args")))) (unless (file-exists-p startfile) - (setq startfile (concat "~/.emacs.d/init_" name ".sh"))) + (setq startfile (concat user-emacs-directory "init_" name ".sh"))) (apply 'make-comint-in-buffer "shell" buffer prog (if (file-exists-p startfile) startfile) (if (and xargs-name (boundp xargs-name)) -- 2.39.2