From 9a873c833162c4bd7e73f61b32c2170577d2ad9e Mon Sep 17 00:00:00 2001
From: utak3r <utak3r>
Date: Sun, 17 Jun 2007 16:37:14 +0000
Subject: [PATCH] Changing a background doesn't need a flame recalculation.

---
 2.10/Source/Adjust.pas | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/2.10/Source/Adjust.pas b/2.10/Source/Adjust.pas
index 56ac562..0e52774 100644
--- a/2.10/Source/Adjust.pas
+++ b/2.10/Source/Adjust.pas
@@ -307,7 +307,7 @@ type
 //    Sample_Density, Zoom: double;
 //    Center: array[0..1] of double;
     procedure UpdateDisplay(PreviewOnly: boolean = false);
-    procedure UpdateFlame;
+    procedure UpdateFlame(bBgOnly: boolean = false);
 
   end;
 
@@ -393,18 +393,18 @@ begin
   DrawPreview;
 end;
 
-procedure TAdjustForm.UpdateFlame;
+procedure TAdjustForm.UpdateFlame(bBgOnly: boolean = false);
 begin
-  MainForm.StopThread;
+  if not bBgOnly then
+    MainForm.StopThread;
   MainForm.UpdateUndo;
   MainCp.Copy(cp, true);
-//  MainCp.cmap := cmap;
-//  MainForm.zoom := zoom;
-//  MainForm.Center[0] := Center[0];
-//  MainForm.Center[1] := Center[1];
   if EditForm.Visible then EditForm.UpdateDisplay;
   if MutateForm.Visible then MutateForm.UpdateDisplay;
-  MainForm.RedrawTimer.enabled := true;
+  if bBgOnly then
+    MainForm.tbShowAlphaClick(Self)
+  else
+    MainForm.RedrawTimer.enabled := true;
 end;
 
 procedure TAdjustForm.DrawPreview;
@@ -935,7 +935,7 @@ begin
     cp.background[1] := col shr 8 and 255;
     cp.background[2] := col shr 16 and 255;
     DrawPreview;
-    UpdateFlame;
+    UpdateFlame(true);
   end;
 end;