From 34700d30bab5faccdb28db1b28e4dfd5520f88f1 Mon Sep 17 00:00:00 2001 From: Michael Stangl Date: Fri, 8 May 2026 13:27:39 +0200 Subject: [PATCH] If Verzweigung hatte Fehler --- Lisp/KreiselInsert.lsp | 12 +----------- 1 file changed, 1 insertion(+), 11 deletions(-) diff --git a/Lisp/KreiselInsert.lsp b/Lisp/KreiselInsert.lsp index 6aa2017..58b087f 100644 --- a/Lisp/KreiselInsert.lsp +++ b/Lisp/KreiselInsert.lsp @@ -10,17 +10,7 @@ (if (getenv "DXFM_BLOCKS") (setq modul-pfad (strcat (getenv "DXFM_BLOCKS") "/")) (progn - (alert "Umgebungsvariable DXFM_BLOCKS nicht gesetzt!\nBitte zuerst bin\\setenv.bat ausfuehren.") - (exit) - ) - - (progn - (alert - "DXFM_BLOCKS nicht gesetzt!\n\n" - "Bitte fuehren Sie zuerst bin\\setenv.bat aus,\n" - "oder setzen Sie den Pfad manuell mit:\n" - "(setenv \"DXFM_BLOCKS\" \"C:/Users/y.wang/Documents/dxfmakros/Blocks/")" - ) + (alert "DXFM_BLOCKS nicht gesetzt!\nBitte zuerst bin\\setenv.bat ausfuehren.") (exit) ) )