gnu: arduino-cli: Disable online update check.

This is a follow up fix found in guix/guix!9583.

* gnu/packages/engineering.scm (arduino-cli):
[arguments]{disable-new-release-check}: New phase, disabling the
automatic online update check in the version command.

Merges: guix/guix!9726
Reviewed-by: bdunahu <bdunahu@operationnull.com>
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>

1 files changed, 14 insertions, 0 deletions

diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index 6429d161b0f..4e77206b4c3 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -1898,6 +1898,20 @@ language, ADMS transforms Verilog-AMS code into other target languages.")
               "pkg/fqbn")
       #:phases
       #~(modify-phases %standard-phases
+          ;; Disable network release check for 'arduino-cli version'
+          ;; command, by removing the 'res'ponse variable and setting
+          ;; 'latestVersion' to empty string to simulate a no check
+          ;; behavior.
+          (add-after 'unpack 'disable-new-release-check
+            (lambda* (#:key import-path #:allow-other-keys)
+              (substitute*
+               (string-append
+                "src/" import-path "/internal/cli/version/version.go")
+               (("res, (err ):= .*$" all first)
+                (string-append "var " first "error\n"))
+               (("(latestVersion = )res\\.GetNewestVersion\\(\\)"
+                 all first)
+                (string-append first "\"\"")))))
           (add-after 'install 'install-shell-completions
             (lambda* (#:key native-inputs #:allow-other-keys)
               (for-each