From f3bbd2f9741d2bcca3d701c164e6599dfec92e1d Mon Sep 17 00:00:00 2001
From: Michael Stangl <m.stangl@schoenenberger.de>
Date: Thu, 7 May 2026 15:11:35 +0200
Subject: [PATCH] Datei wurde beim Foerdertest gleich 2 mal gespeichert. Einmal
 reicht.

---
 Lisp/VarioFoerderer.lsp | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/Lisp/VarioFoerderer.lsp b/Lisp/VarioFoerderer.lsp
index 8aa38a5..453387e 100644
--- a/Lisp/VarioFoerderer.lsp
+++ b/Lisp/VarioFoerderer.lsp
@@ -1223,17 +1223,7 @@
     (setq result-pfad (getenv "DXFM_RESULTS"))
     (setq result-pfad (strcat (getenv "DXFM_BLOCKS") "../results"))
   )
-  (setq dateiname (strcat result-pfad
-                          "/FOERDERTEST_"
-                          (menucmd "M=$(edtime,$(getvar,date),YYYYMODD-HHmmss)")
-                          ".dxf"))
-  (princ (strcat "\n\n📁 Gespeichert als: " dateiname))
-  (command "_.DXFOUT" dateiname "V" "2018" "16")
-  
-  (princ "\n\n>>> FOERDERTEST abgeschlossen! <<<")
-  (princ)
-
-
+ 
   ;; Dateiname: datum-HHMM.dxf
   (if (getenv "DXFM_RESULTS")
     (setq result-pfad (getenv "DXFM_RESULTS"))