diff mbox series

[bug#76939] gnu: gambas: Update to 3.20.2.

Message ID 6390bef80e6e6eff7c3b7d3e2146370fb75533d2.1741693405.git.iyzsong@member.fsf.org
State New
Headers
Series [bug#76939] gnu: gambas: Update to 3.20.2. |

Commit Message

King, Spencer via Guix-patches" via March 11, 2025, 11:43 a.m. UTC 
  From: 宋文武 <iyzsong@member.fsf.org>

* gnu/packages/gambas.scm (gambas): Update to 3.20.2.
[source]: Remove snippet.
[arguments]: Fix install-desktop-file phase.

Change-Id: I38884d0d0fc16d7ebcf97de9ab17e316251f11dc
---
 gnu/packages/gambas.scm | 16 ++++------------
 1 file changed, 4 insertions(+), 12 deletions(-)


base-commit: 7b9cd0b4293041fdbfa065b019cea589cc316060
diff mbox series

Patch

diff --git a/gnu/packages/gambas.scm b/gnu/packages/gambas.scm
index caa5d0b31d..76a8b0cc9e 100644
--- a/gnu/packages/gambas.scm
+++ b/gnu/packages/gambas.scm
@@ -55,7 +55,7 @@  (define-module (gnu packages gambas)
 (define-public gambas
   (package
     (name "gambas")
-    (version "3.20.1")
+    (version "3.20.2")
     (source
      (origin
        (method git-fetch)
@@ -64,13 +64,7 @@  (define-public gambas
              (commit version)))
        (file-name (git-file-name name version))
        (sha256
-        (base32 "1fw3nark7vaw4vbmdvaaqb0an4838k0hhwwvc3dqd7f2033d41xq"))
-       (modules '((guix build utils)))
-       (snippet
-        ;; Fix desktop file creation, upstream commit bbaa7b40.
-        '(substitute* "comp/src/gb.gui.base/.src/_Gui.class"
-           (("If sDir Begins [(]User\\.Home & \"/\"[)]" all)
-            (string-append all " And If Access(sDir, gb.Write)"))))))
+        (base32 "060f8w19jf78mappqgy11873ss3h97gi47ga3c1ws1bazix9x7rk"))))
     (build-system gnu-build-system)
     (arguments
      (list
@@ -122,10 +116,8 @@  (define-public gambas
               (let* ((out (assoc-ref outputs "out"))
                      (appdir (string-append out "/share/applications"))
                      (icondir (string-append out "/share/pixmaps")))
-                (install-file "app/desktop/gambas3.desktop"
-                              (string-append appdir "/gambas3.desktop"))
-                (install-file "app/desktop/gambas3.png"
-                              (string-append icondir "/gambas3.png"))))))))
+                (install-file "app/desktop/gambas3.desktop" appdir)
+                (install-file "app/desktop/gambas3.png" icondir)))))))
     (native-inputs
      (list autoconf
            automake