From 17cb6596cc2b53428809cd45a73b645b4b48a2bd Mon Sep 17 00:00:00 2001
From: Wizzup? <Wizzup?@3f818213-9676-44b0-a9b4-5e4c4e03d09d>
Date: Tue, 1 Dec 2009 13:11:14 +0000
Subject: [PATCH] If the current window bitmap is beeing freed, don't raise an
 exception, but default to desktop and print a warning.

git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@259 3f818213-9676-44b0-a9b4-5e4c4e03d09d
---
 Units/MMLCore/window.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/Units/MMLCore/window.pas b/Units/MMLCore/window.pas
index 855804b..81c3a0d 100644
--- a/Units/MMLCore/window.pas
+++ b/Units/MMLCore/window.pas
@@ -261,7 +261,9 @@ end;
 
 procedure TMWindow.OnTargetBitmapDestroy(Bitmap: TMufasaBitmap);
 begin
-  raise Exception.CreateFmt('Our targetbitmap has been destroyed, what now?',[]);
+  Self.SetDesktop;
+  writeln('Our current bitmap is being freed! Defaulting to Desktop.');
+ // raise Exception.CreateFmt('Our targetbitmap has been destroyed, what now?',[]);
 end;
 
 function TMWindow.GetColor(x, y: integer): TColor;