From fcc08f924002a8cd8e54285dbc7e0562b3aa7cae Mon Sep 17 00:00:00 2001
From: Kenichi Maehashi <webmaster@kenichimaehashi.com>
Date: Sun, 21 Oct 2018 01:18:56 +0900
Subject: [PATCH] ignore exception in destructor

---
 .../Framework/XINamedTemporaryFile.xojo_code      | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/XojoInstruments/XojoInstruments/Framework/XINamedTemporaryFile.xojo_code b/XojoInstruments/XojoInstruments/Framework/XINamedTemporaryFile.xojo_code
index bcf9c85..addeb03 100644
--- a/XojoInstruments/XojoInstruments/Framework/XINamedTemporaryFile.xojo_code
+++ b/XojoInstruments/XojoInstruments/Framework/XINamedTemporaryFile.xojo_code
@@ -9,10 +9,17 @@ Implements XIObject
 
 	#tag Method, Flags = &h21
 		Private Sub Destructor()
-		  Dim f As Xojo.IO.FolderItem = Me.GetFolderItem()
-		  If f.Exists() Then
-		    f.Delete()
-		  End If
+		  Try
+		    Dim f As Xojo.IO.FolderItem = Me.GetFolderItem()
+		    If f.Exists() Then
+		      f.Delete()
+		    End If
+		  Exception e As RuntimeException
+		    // Ignore exceptions are we can do nothing here.
+		    #if DebugBuild
+		      Break
+		    #endif
+		  End Try
 		End Sub
 	#tag EndMethod