From 659aa8e8c11b274e83c2c8b735f21288b702146d Mon Sep 17 00:00:00 2001 From: Simon Hensch Date: Fri, 17 Jul 2026 12:39:22 +0200 Subject: [PATCH] [FIX] JSON Parser in Lisp konnte keine leeren JSON Attribut-Objekte behandeln (Kurve:{}) und hat einen Fehler geworfen. Dieses Verhalten wurde nun korrigiert --- Lisp/ssg_core.lsp | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/Lisp/ssg_core.lsp b/Lisp/ssg_core.lsp index 6bbf28f..accbc60 100644 --- a/Lisp/ssg_core.lsp +++ b/Lisp/ssg_core.lsp @@ -733,6 +733,17 @@ ((and (not in-section) (= trimmed "{")) nil) ((and (not in-section) (= trimmed "}")) nil) + ;; Leere Section auf einer Zeile: "name": {} + ;; (Section-Start und -Ende zugleich - json.dump schreibt leere + ;; Objekte immer inline, unabhaengig von der Einrueckung.) + ((and (not in-inner) + (>= (strlen trimmed) 2) + (= (substr trimmed (1- (strlen trimmed)) 2) "{}")) + (setq section (substr trimmed 2 + (1- (vl-string-search "\"" trimmed 1)))) + (setq ergebnis (cons (cons section nil) ergebnis)) + ) + ;; Section-Start: "name": { ((and (not in-inner) (vl-string-search ": {" trimmed)) (setq kv (ssg-cfg-parse-kv