From 16a750e04881ed67fe2e5ec9b14d889630ffd8a1 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Mon, 14 Aug 2017 12:12:25 +0200
Subject: epostunit.pas: small cleanup

---
 epostunit.pas | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'epostunit.pas')

diff --git a/epostunit.pas b/epostunit.pas
index 6a87ca9..aaafc1e 100644
--- a/epostunit.pas
+++ b/epostunit.pas
@@ -4348,10 +4348,8 @@ begin
   gibAus(' (Parseval-Fehler = '+floatToStr(pvFehler)+')',3);
   gibAus('... fertig! '+timetostr(now-Zeit),3);
   gibAus('Wertenachbearbeiten ...',3);
-  case dos[4] of
-    doBetr,doBetrQdr:
-      fft2dNachbearbeitung(threads,dos[4]);
-  end{of case};
+  if dos[3]<>dos[4] then
+    fft2dNachbearbeitung(threads,dos[4]);
   gibAus('... fertig! '+timetostr(now-Zeit),3);
   for b:=false to true do
     fensters[b].free;
-- 
cgit v1.2.3-70-g09d2