2eca169326
Vollstaendiger i18n-Rollout ueber alle Feature- und Kernmodule: alle benutzersichtbaren princ/prompt/getXXX/alert-Texte laufen jetzt ueber die zentrale Sprachtabelle in ssg_lang.lsp (Deutsch/Englisch, umschaltbar via SSG_SPRACHE). 403 Tabelleneintraege, 497 Aufrufstellen in 17 Dateien. Ausgeschlossen wie geplant: Debug-Ausgaben (dbg*), Lademeldungen, [DUMMY]-Platzhalter, [CFG]/[OMNI]-Diagnosemarker. Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
22 lines
792 B
Plaintext
22 lines
792 B
Plaintext
;; ============================================================
|
|
;; VarioFoerderer.lsp — Kompatiblitaets-Wrapper
|
|
;; Laedt vf_core.lsp (Plugin-Dispatcher-Architektur)
|
|
;; ============================================================
|
|
;; vf_core.lsp laden: 1) DXFM_LISP, 2) *ssg-lisp-pfad* (vom MNL gesetzt), 3) findfile
|
|
(setq *vf-core-datei*
|
|
(cond
|
|
((getenv "DXFM_LISP")
|
|
(strcat (vl-string-translate "\\" "/" (getenv "DXFM_LISP")) "/vf_core.lsp"))
|
|
((and (boundp '*ssg-lisp-pfad*) *ssg-lisp-pfad*
|
|
(findfile (strcat *ssg-lisp-pfad* "/vf_core.lsp")))
|
|
(strcat *ssg-lisp-pfad* "/vf_core.lsp"))
|
|
((findfile "vf_core.lsp")
|
|
(findfile "vf_core.lsp"))
|
|
(t nil)
|
|
)
|
|
)
|
|
(if *vf-core-datei*
|
|
(load *vf-core-datei*)
|
|
(princ (ssg-text "vfstart-core-nicht-gefunden"))
|
|
)
|