Changeset 5185

Timestamp:

Oct 17, 2022, 3:22:48 AM (2 years ago)

Author:

Andreas Schnellbacher

Message:

• Fixed SaveProcessNetlabsFile: Handle the case when SaveAsCheckExist returns empty.

File:

• trunk/src/netlabs/macros/file.e (modified) (3 diffs)

trunk/src/netlabs/macros/file.e ¶

@@ -217 +217 @@
          Type = 'NEPMD source'
          NewFilename = UserDir''substr( Filename, length( NetlabsDevDir) + 1)
+dprintf( 'SaveProcessNetlabsFile: NewFilename = 'NewFilename)
       else
          leave
@@ -237 +238 @@
          -- Create tree, if not existing
          call MakeTree( NewDir)
-
-         NewFilename = SaveAsCheckExist( Filename)
-         Filename = NewFilename
+         ChangedFilename = SaveAsCheckExist( Filename)
+         -- SaveAsCheckExist may return empty
+         if ChangedFilename <> '' then
+            Filename = ChangedFilename
+         endif
          if rc < 0 then
             -- nop
@@ -251 +254 @@
       endif
    enddo
+dprintf( 'SaveProcessNetlabsFile: Returned Filename = 'Filename)
    return Filename