Default für CSV Export ist nur die Spur der Separatoren.

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/
+;;   "separator_track" - Default. Klassisches Verhalten vor beiden
-;;                        Streckenelemente/Umlenk-/Motorstation zu je einer
+;;                        Erweiterungen: nur AS/ES/Separator, keine
-;;                        Zeile pro Foerdereinheit/Gefaelleeinheit zusammen,
+;;                        Einzelteile UND keine Foerdereinheit/Gefaelleeinheit-
-;;                        die pattern_nested_*-Einzelteil-Zeilen bleiben aus
+;;                        Marker (weder csv:element-proxies-erzeugen noch
-;;                        dem Export ausgeschlossen.
+;;                        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:
+;;   "group_vf_gf"     - csv:ketten-verarbeiten fasst Boegen/Streckenelemente/
-;;                        nur AS/ES/Separator, keine Einzelteile UND keine
+;;                        Umlenk-/Motorstation zu je einer Zeile pro
-;;                        Foerdereinheit/Gefaelleeinheit-Marker (weder
+;;                        Foerdereinheit/Gefaelleeinheit zusammen, die
-;;                        csv:element-proxies-erzeugen noch csv:unitmark-
+;;                        pattern_nested_*-Einzelteil-Zeilen bleiben aus dem
-;;                        aktualisieren legen dafuer etwas Neues an - siehe
+;;                        Export ausgeschlossen.
-;;                        csv:export-vorbereiten).
 ;; 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)