File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 61
61
; ; Backup the current installed versions, this file can be restored if version
62
62
; ; upgrade does break some packages.
63
63
(message " [MinEmacs]: Creating backups for the current versions of packages " )
64
- (let* ((backup-dir (concat minemacs-local-dir ( format " minemacs/versions/ " ) ))
65
- (dest-file (concat backup-dir " default- " (format-time-string " %Y%m%d%H%M%S" ) " .el" ))
64
+ (let* ((backup-dir (concat minemacs-local-dir " minemacs/versions/" ))
65
+ (dest-file (concat backup-dir (format-time-string " default- %Y%m%d%H%M%S.el" ) ))
66
66
(src-file (concat straight-base-dir " straight/versions/default.el" )))
67
- (unless (file-directory-p backup-dir) (mkdir backup-dir : parents ))
67
+ (unless (file-directory-p backup-dir) (mkdir backup-dir ' parents ))
68
68
(when (file-exists-p src-file)
69
69
(message " [MinEmacs]: Creating backup from \" %s \" to \" %s \" " src-file dest-file)
70
70
(copy-file src-file dest-file)))
You can’t perform that action at this time.
0 commit comments