From 731f59f96530d107db7bd1b5ac35c5accf255e4a Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 13 Aug 2017 11:54:46 -0700 Subject: [PATCH] Backport commit 5bdc97d55 from Emacs Be consistent in spelling 'ok-if-already-exists'. 5bdc97d55df30f6af107ddd136901983a7e2706a Paul Eggert Sun Aug 13 11:55:12 2017 -0700 --- lisp/org-mobile.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-mobile.el b/lisp/org-mobile.el index c5b9e10f4..192ccadfd 100644 --- a/lisp/org-mobile.el +++ b/lisp/org-mobile.el @@ -467,7 +467,7 @@ agenda view showing the flagged items." (make-directory target-dir 'parents)) (if org-mobile-use-encryption (org-mobile-encrypt-and-move file target-path) - (copy-file file target-path 'ok-if-exists)) + (copy-file file target-path 'ok-if-already-exists)) (setq check (shell-command-to-string (concat (shell-quote-argument org-mobile-checksum-binary) " " @@ -687,7 +687,7 @@ encryption program does not understand them." (let ((encfile (concat infile "_enc"))) (org-mobile-encrypt-file infile encfile) (when outfile - (copy-file encfile outfile 'ok-if-exists) + (copy-file encfile outfile 'ok-if-already-exists) (delete-file encfile)))) (defun org-mobile-encrypt-file (infile outfile)