Eliminate PDF deletion in Windows

[lilypond.git] / scm / backend-library.scm

diff --git a/scm/backend-library.scm b/scm/backend-library.scm
index 90c0cd07edfa725620e215eb4ba89d20fad9323d..cc689d848273502ada9073aa84e05880d9a82a77 100644 (file)
--- a/scm/backend-library.scm
+++ b/scm/backend-library.scm
@@ -125,9 +125,7 @@
     (if (eq? PLATFORM 'windows)
        (begin
          (set! cmd (string-regexp-substitute "=" "#" cmd))
-         (set! cmd (string-regexp-substitute "-dSAFER " "" cmd))
-         (if (access? pdf-name W_OK)
-             (delete-file pdf-name))))
+         (set! cmd (string-regexp-substitute "-dSAFER " "" cmd))))
 
     (ly:message (_ "Converting to `~a'...") pdf-name)
     (ly:progress "\n")