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) ) )