Changeset 4904

Timestamp:

Mar 3, 2022, 8:02:26 PM (3 years ago)

Author:

Andreas Schnellbacher

Message:

• Avoid error msg on trying to unlink an already unlinked file.

Location:

trunk/src/netlabs/macros

Files:

• showf.e (modified) (3 diffs)
• showu.e (modified) (3 diffs)

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

@@ -46 +46 @@
       FieldVar = substr( LineStr, startcol, endcol - startcol + 1)
       if leftstr( FieldVar, 1) <> '.' then
-         sayerror "Specify a field var or place cursor over one."
+         "SayError Specify a field var or place cursor over one."
          return
       endif
@@ -76 +76 @@
    replaceline 'defmain', 1
    insertline  '   fid = 'fid, 2
-   insertline  '   sayerror '''FieldVar' = "''fid'FieldVar'''"''', 3
+   insertline  '   ''SayError 'FieldVar' = "''fid'FieldVar'''"''', 3
    'xcom File'
 
@@ -84 +84 @@
    endif
 
-   'UnLink' ExName       -- (just in case...)
+   --'UnLink' ExName       -- (just in case...)
    'sf_temp'
 

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

@@ -56 +56 @@
          not pos( substr( .line, .col, 1), ' ,')
       then
-         sayerror "Specify a univ. var or place cursor over one (on a 'universal' line)."
+         "SayError Specify a univ. var or place cursor over one (on a 'universal' line)."
          return
       endif
@@ -81 +81 @@
    replaceline 'defmain', 1
    insertline  '   universal' UniVar, 2
-   insertline  '   sayerror '''UniVar' = "'''UniVar'''"''', 3
+   insertline  '   ''SayError 'UniVar' = "'''UniVar'''"''', 3
    'xcom file'
 
@@ -89 +89 @@
    endif
 
-   'UnLink' ExName       -- (just in case...)
+   --'UnLink' ExName       -- (just in case...)
    'su_temp'