Fallbackpfad für OMniflo Elemente von 2D/3D, da aktuell nur 2D definiert

tests/test_omniflo_strecke.lsp

@@ -46,6 +46,9 @@
 
 
 ;; --- Bogen-DXF non-interaktiv an gegebenem Punkt einfuegen ---
+;; Pfadaufloesung (inkl. DWG- und 2D/3D-Dimensionsfallback) wie im
+;; produktiven Einfuege-/Edit-Pfad ueber omni:omniflo-datei-finden
+;; (OmniModulInsert.lsp) - nicht mehr lokal dupliziert.
 (defun omnistr:insert-bogen (sivasnr-str insert-pt hoehe-str drehung-str /
                              dxf-pfad omniflo-pfad blockEnt angleDeg)
   (dbgf "omnistr:insert-bogen")
@@ -60,10 +63,10 @@
       nil
     )
     (progn
-      (setq dxf-pfad (strcat omniflo-pfad "/" sivasnr-str ".dxf"))
-      (if (not (findfile dxf-pfad))
+      (setq dxf-pfad (omni:omniflo-datei-finden sivasnr-str omniflo-pfad))
+      (if (not dxf-pfad)
         (progn
-          (dbgmsg (strcat "WARNUNG: DXF nicht gefunden: " dxf-pfad))
+          (dbgmsg (strcat "WARNUNG: DXF nicht gefunden: " omniflo-pfad "/" sivasnr-str ".dxf"))
           nil
         )
         (progn