global-functions: $ScriptInstallUpdate: remove script on failure when installing

1 files changed, 7 insertions, 1 deletions

diff --git a/global-functions b/global-functions
index bf9538c..3a2497e 100644
--- a/global-functions
+++ b/global-functions
@@ -808,7 +808,13 @@
             :set SourceNew ($Result->"data");
           }
         } on-error={
-          $LogPrintExit2 warning $0 ("Failed fetching script '" . $ScriptVal->"name" . "'!") false;
+          :if ($ScriptVal->"source" = "#!rsc by RouterOS\n") do={
+            $LogPrintExit2 warning $0 ("Failed fetching script '" . $ScriptVal->"name" . \
+              "', removing dummy. Typo on installation?") false;
+            /system/script/remove $Script;
+          } else={
+            $LogPrintExit2 warning $0 ("Failed fetching script '" . $ScriptVal->"name" . "'!") false;
+          }
         }
       }
     }