Make a backup of the source file; accidents happen

tecosaur · Oct 25, 2020 · f51f51e · f51f51e
1 parent 554b189
commit f51f51e
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/org-pandoc-import-transient.el b/org-pandoc-import-transient.el
@@ -133,6 +133,7 @@ actions that may undesirably trigger the file watcher.")
                       (start-time (time-to-seconds (current-time)))
                       (org-pandoc-import-transient--currently-processing t))
             (unless (plist-get file-info :initialised)
+              (copy-file source-file (concat source-file ".backup") nil t)
               (delete-file org-file) ; to avoid the overwrite prompt
               (message "Initialising...")
               (org-pandoc-import-to-org nil source-file org-file t)