mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-17 c4001ccd1864293b64aa37d83a9d9457eb875e70
added command to remove backup files
1 files modified
7 ■■■■■ changed files
custom/setup-environment.el 7 ●●●●● patch | view | raw | blame | history
custom/setup-environment.el
@@ -12,3 +12,10 @@
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
(load-theme 'zenburn t)
;; remove backup files
(when (eq system-type 'windows-nt)
  (defadvice backup-buffer (after my-backup-make-hidden activate)
    (let ((backup-file-name (make-backup-file-name (buffer-file-name))))
      (when (file-exists-p backup-file-name)
    (call-process "attrib.exe" nil nil nil "+I" "+H" backup-file-name)))))