diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -79,7 +79,7 @@ (defun bedrock--backup-file-name (fpath) "Return a new file path of a given file path. If the new path's directories does not exist, create them." - (let* ((backupRootDir "~/.emacs.d/emacs-backup/") + (let* ((backupRootDir (concat user-emacs-directory "emacs-backup/")) (filePath (replace-regexp-in-string "[A-Za-z]:" "" fpath )) ; remove Windows driver letter in path (backupFilePath (replace-regexp-in-string "//" "/" (concat backupRootDir filePath "~") ))) (make-directory (file-name-directory backupFilePath) (file-name-directory backupFilePath)) |