Schoenenberger_Systeme_GmbH/dxfmakros
3
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

Saveload deaktiviert. Beim Laden möchte ich Fehler sehen, wenn welche da sind

Browse Source
This commit is contained in:
Michael Stangl
2026-05-08 13:32:05 +02:00
parent 34700d30ba
commit cf17e92056
2 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Lisp/KreiselInsert.lsp
+1 -1
View File
@@ -17,7 +17,7 @@
;; block-pfad neu setzen ;; block-pfad neu setzen
(setq *block-path* (getenv "DXFM_BLOCKS")) (setq *block-path* (getenv "DXFM_BLOCKS"))
(princ (strcat "\n✅ Block-Pfad: " block-pfad)) (princ (strcat "\nBlock-Pfad: " *block-path*))
;; Basispunkt: Linker Kreis, linkester Tangentenpunkt (links Mitte) ;; Basispunkt: Linker Kreis, linkester Tangentenpunkt (links Mitte)
;; ============================================ ;; ============================================
bin/on_start.lsp
+3 -2
View File
@@ -35,9 +35,10 @@
(setvar "SRCHPATH" (strcat curr-srch ";" lisp-pfad)) (setvar "SRCHPATH" (strcat curr-srch ";" lisp-pfad))
) )
;; Library laden ;; Library laden (direkt, damit Fehler sichtbar sind)
(if (findfile (strcat lisp-pfad "/ssg_load.lsp")) (if (findfile (strcat lisp-pfad "/ssg_load.lsp"))
(if (ssg-lib-safe-load (strcat lisp-pfad "/ssg_load.lsp")) (progn
(load (strcat lisp-pfad "/ssg_load.lsp"))
(princ "\n[SSG_LIB] ssg_load.lsp geladen.") (princ "\n[SSG_LIB] ssg_load.lsp geladen.")
) )
(princ "\n[SSG_LIB] WARNUNG: ssg_load.lsp nicht gefunden!") (princ "\n[SSG_LIB] WARNUNG: ssg_load.lsp nicht gefunden!")