# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1609671140 -7200
# Node ID e097377229836f46e3ef035f504a744087b601c2
# Parent  66790aade06ee9ea9956b13ad28fc8b98417169e
Set extra support file policies earlier in init file.

diff -r 66790aade06e -r e09737722983 .emacs-my
--- a/.emacs-my	Sat Jan 02 23:35:40 2021 +0200
+++ b/.emacs-my	Sun Jan 03 12:52:20 2021 +0200
@@ -95,6 +95,39 @@
 ;; (setq global-auto-revert-mode 1)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "lockfile")
+
+;; (info "(elisp) File Locks")
+
+;; Disable stupid file locking. It breaks editing WSL files from Cygwin Emacs.
+;; https://emacs.stackexchange.com/questions/61962/what-is-interlocking-about
+;; https://cygwin.com/pipermail/cygwin/2020-November/246887.html
+(setq create-lockfiles nil)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "backuping")
+
+(setq
+ make-backup-files t
+ ;; In other case (by renaming) you loose original file creation date.
+ backup-by-copying t
+ backup-directory-alist '(("." . "~/.emacs.d/.backup")) ; don't litter my fs tree
+ delete-old-versions t                         ; delete excess backup versions silently
+ kept-old-versions 1                           ; store first original version
+ kept-new-versions 3                           ; store last 3 version
+ version-control t)                            ; use versioned backups
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "auto save")
+
+(setq auto-save-default t)
+;; If nil autosave to different than original to buffer file.
+(setq auto-save-visited-file-name nil)
+(setq auto-save-interval 300)
+;; Note: if you kill unsaved file auto save file not deleted.
+(setq delete-auto-save-files t)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "debugging")
 
 ;; Shut off message buffer by setting nil.
@@ -3829,34 +3862,6 @@
        (json-pretty-print-buffer)))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "backuping")
-
-(setq
- make-backup-files t
- ;; In other case (by renaming) you loose original file creation date.
- backup-by-copying t
- backup-directory-alist '(("." . "~/.emacs.d/.backup")) ; don't litter my fs tree
- delete-old-versions t                         ; delete excess backup versions silently
- kept-old-versions 1                           ; store first original version
- kept-new-versions 3                           ; store last 3 version
- version-control t)                            ; use versioned backups
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "auto save")
-
-;; Disable stupid file locking. It breaks editing WSL files from Cygwin Emacs.
-;; https://emacs.stackexchange.com/questions/61962/what-is-interlocking-about
-;; https://cygwin.com/pipermail/cygwin/2020-November/246887.html
-(setq create-lockfiles nil)
-
-(setq auto-save-default t)
-;; If nil autosave to different than original to buffer file.
-(setq auto-save-visited-file-name nil)
-(setq auto-save-interval 300)
-;; Note: if you kill unsaved file auto save file not deleted.
-(setq delete-auto-save-files t)
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "desktop")
 
 ;; Save and restore my buffers every time.