diff --git a/settings/general-settings.el b/settings/general-settings.el
index 263fcfa5..f7b0f8ce 100644
--- a/settings/general-settings.el
+++ b/settings/general-settings.el
@@ -70,6 +70,17 @@
 (setq savehist-file (concat user-cache-directory "history"))
 (savehist-mode)
 
+(use-package x-win
+  :defer t
+  :config
+  ;; overwrite
+  (defun emacs-session-filename (session-id)
+    "Construct a filename to save the session in based on SESSION-ID.
+Return a filename in `user-emacs-directory', unless the session file
+already exists in the home directory."
+    (let ((basename (concat "session." session-id)))
+      (concat user-cache-directory basename))))
+
 ;;; desktop
 (require 'desktop)
 ;; save session