From 3a5e771931a2ea5d809a73ba32ec13129a8ed9fa Mon Sep 17 00:00:00 2001 From: Michael Stangl Date: Mon, 28 Sep 2026 12:33:43 +0200 Subject: [PATCH] =?UTF-8?q?Default=20f=C3=BCr=20CSV=20Export=20ist=20nur?= =?UTF-8?q?=20die=20Spur=20der=20Separatoren.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Lisp/export.lsp | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) diff --git a/Lisp/export.lsp b/Lisp/export.lsp index 8236a77..edd579b 100644 --- a/Lisp/export.lsp +++ b/Lisp/export.lsp @@ -54,27 +54,27 @@ ;; Drei sich gegenseitig ausschliessende Werte (String, ueber CSV_EXPORT_ ;; KONFIG/dcl/csv_export_konfig.dcl bedienbar, siehe c:CSV_EXPORT_KONFIG ;; weiter unten): -;; "group_vf_gf" - Default. csv:ketten-verarbeiten fasst Boegen/ -;; Streckenelemente/Umlenk-/Motorstation zu je einer -;; Zeile pro Foerdereinheit/Gefaelleeinheit zusammen, -;; die pattern_nested_*-Einzelteil-Zeilen bleiben aus -;; dem Export ausgeschlossen. +;; "separator_track" - Default. Klassisches Verhalten vor beiden +;; Erweiterungen: nur AS/ES/Separator, keine +;; Einzelteile UND keine Foerdereinheit/Gefaelleeinheit- +;; Marker (weder csv:element-proxies-erzeugen noch +;; csv:unitmark-aktualisieren legen dafuer etwas Neues +;; an - siehe csv:export-vorbereiten). ;; "all_elements" - Verhalten wie vor der Gruppierung: jedes Einzelteil ;; (Bogen/Streckenelement/Umlenk-/Motorstation) ;; bekommt seine eigene Export-Zeile ;; (csv:collect-export-blocks laesst die ;; pattern_nested_*-Klauseln durch, csv:unitmark- ;; aktualisieren legt keine neuen Marker an). -;; "separator_track" - Klassisches Verhalten vor beiden Erweiterungen: -;; nur AS/ES/Separator, keine Einzelteile UND keine -;; Foerdereinheit/Gefaelleeinheit-Marker (weder -;; csv:element-proxies-erzeugen noch csv:unitmark- -;; aktualisieren legen dafuer etwas Neues an - siehe -;; csv:export-vorbereiten). +;; "group_vf_gf" - csv:ketten-verarbeiten fasst Boegen/Streckenelemente/ +;; Umlenk-/Motorstation zu je einer Zeile pro +;; Foerdereinheit/Gefaelleeinheit zusammen, die +;; pattern_nested_*-Einzelteil-Zeilen bleiben aus dem +;; Export ausgeschlossen. ;; Ein ungueltiger Wert wird von csv:export-modus-setzen ignoriert (Modus ;; bleibt unveraendert) statt die Zeichnung in einen unbekannten Zustand zu ;; versetzen. -(if (not (boundp '*csv-export-modus*)) (setq *csv-export-modus* "group_vf_gf")) +(if (not (boundp '*csv-export-modus*)) (setq *csv-export-modus* "separator_track")) (defun csv:export-modus () *csv-export-modus*) (defun csv:export-modus-setzen (modus) (if (member modus '("all_elements" "group_vf_gf" "separator_track")) @@ -2708,9 +2708,9 @@ ;; auseinanderlaufen kann. (setq *csv-export-konfig-modi* (list - (cons "group_vf_gf" "Gruppiert: Foerdereinheit/Gefaelleeinheit (Standard)") + (cons "group_vf_gf" "Gruppiert: Foerdereinheit/Gefaelleeinheit") (cons "all_elements" "Alle Einzelelemente (Boegen, Strecken, Umlenk-/Motorstation)") - (cons "separator_track" "Nur Separator-Spur (AS/ES/Separator, ohne Streckenelemente)") + (cons "separator_track" "Nur Separator-Spur (AS/ES/Separator, ohne Streckenelemente) (Standard)") )) (defun csv:export-konfig-init ( / idx eintrag)