[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master c92fd4e: ; Instrumentation for shadowfile.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master c92fd4e: ; Instrumentation for shadowfile.el |
Date: |
Sun, 29 Jul 2018 12:35:55 -0400 (EDT) |
branch: master
commit c92fd4e0e0ef3d132b8beeb5f4ecaf3a6451616e
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
; Instrumentation for shadowfile.el
---
lisp/shadowfile.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/lisp/shadowfile.el b/lisp/shadowfile.el
index 6090867..dc7c1b8 100644
--- a/lisp/shadowfile.el
+++ b/lisp/shadowfile.el
@@ -636,12 +636,16 @@ Consider them as regular expressions if third arg REGEXP
is true."
(shadow-expand-file-name
(buffer-file-name (current-buffer))))))
(when shadows
+ (message "shadow-add-to-todo 5 %s" shadows)
+ (message "shadow-add-to-todo 6 %s" shadow-files-to-copy)
+ (message "shadow-add-to-todo 7 %s" (shadow-union shadows
shadow-files-to-copy))
(setq shadow-files-to-copy
(shadow-union shadows shadow-files-to-copy))
(when (not shadow-inhibit-message)
(message "%s" (substitute-command-keys
"Use \\[shadow-copy-files] to update shadows."))
(sit-for 1))
+ (message "shadow-add-to-todo 8")
(shadow-write-todo-file)))
nil) ; Return nil for write-file-functions
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master c92fd4e: ; Instrumentation for shadowfile.el,
Michael Albinus <=