(shadow-initialize) <shadow-info-file, shadow-todo-file>: Run file names
authorEli Zaretskii <eliz@gnu.org>
Sun, 19 Oct 2008 10:13:17 +0000 (10:13 +0000)
committerEli Zaretskii <eliz@gnu.org>
Sun, 19 Oct 2008 10:13:17 +0000 (10:13 +0000)
that begin with a period thru `convert-standard-filename'.

lisp/shadowfile.el

index 8b311d5..f4f8f85 100644 (file)
@@ -805,10 +805,11 @@ look for files that have been changed and need to be copied to other systems."
            (file-name-as-directory (shadow-expand-file-name "~"))))
   (if (null shadow-info-file)
       (setq shadow-info-file
-           (shadow-expand-file-name "~/.shadows")))
+           (shadow-expand-file-name (convert-standard-filename "~/.shadows"))))
   (if (null shadow-todo-file)
       (setq shadow-todo-file
-           (shadow-expand-file-name "~/.shadow_todo")))
+           (shadow-expand-file-name
+            (convert-standard-filename "~/.shadow_todo"))))
   (if (not (shadow-read-files))
       (progn
        (message "Shadowfile information files not found - aborting")