[Emacs-diffs] master db80851: ; Instrumentation for shadowfile.el

[Michael Albinus]

branch: master
commit db80851a1f10d73f0b2c12299c3d77716bb8425a
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 180d502..6090867 100644
--- a/lisp/shadowfile.el
+++ b/lisp/shadowfile.el
@@ -628,6 +628,10 @@ Consider them as regular expressions if third arg REGEXP 
is true."
 
 (defun shadow-add-to-todo ()
   "If current buffer has shadows, add them to the list needing to be copied."
+  (message "shadow-add-to-todo 1 %s" (current-buffer))
+  (message "shadow-add-to-todo 2 %s" (buffer-file-name))
+  (message "shadow-add-to-todo 3 %s" (shadow-expand-file-name 
(buffer-file-name  (current-buffer))))
+  (message "shadow-add-to-todo 4 %s" (shadow-shadows-of 
(shadow-expand-file-name (buffer-file-name (current-buffer)))))
   (let ((shadows (shadow-shadows-of
                  (shadow-expand-file-name
                   (buffer-file-name (current-buffer))))))