From: Nathan Reed <nathaniel.reed@gmail.com>
Date: Thu, 6 May 2010 01:19:12 +0000 (-0700)
Subject: Eliminate PDF deletion in Windows
X-Git-Tag: release/2.13.21-1~37
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=12b56b962fe81a56997a6c5fca448fd71a4ec0bb;p=lilypond.git

Eliminate PDF deletion in Windows

Signed-off-by: Patrick McCarty <pnorcks@gmail.com>
---

diff --git a/scm/backend-library.scm b/scm/backend-library.scm
index 90c0cd07ed..cc689d8482 100644
--- 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")