~ruther/guix-local

7da79dde4d75fa924e2512c30aaf25dbd936768c — aurtzy 1 year, 4 months ago 0aabe12
gnu: gnome-shell-extension-gsconnect: Patch shebangs with gjs.

The 'patch-shebangs phase does not handle shebangs of the form
"/usr/bin/env -S", so we manually patch them to fix a not-found error.

* gnu/packages/gnome-xyz.scm (gnome-shell-extension-gsconnect):
[arguments]<#:phases>: Add 'patch-gjs-shebangs phase to patch shebangs using
"/usr/bin/env -S" to execute gjs.

Change-Id: I6b84474e4976484f1203b7cf78fe5e882694cd22
Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
1 files changed, 13 insertions(+), 0 deletions(-)

M gnu/packages/gnome-xyz.scm
M gnu/packages/gnome-xyz.scm => gnu/packages/gnome-xyz.scm +13 -0
@@ 761,6 761,19 @@ faster window switching.")
                 "gtk_update_icon_cache: false")
                (("update_desktop_database: true")
                 "update_desktop_database: false"))))
          ;; TODO: Remove after 'patch-shebangs is fixed to handle '/usr/bin/env -S'
          ;; shebangs (see bug#74450).
          (add-after 'unpack 'patch-gjs-shebangs
            (lambda* (#:key inputs #:allow-other-keys)
              (for-each (lambda (file)
                          (substitute* file
                            (("^#!/usr/bin/env -S gjs.*$")
                             (string-append "#!" (which "gjs") " -m"))))
                        '("installed-tests/minijasmine"
                          "src/gsconnect-preferences"
                          "src/service/nativeMessagingHost.js"
                          "src/service/daemon.js"
                          "webextension/gettext.js"))))
          (add-before 'configure 'fix-paths
            (lambda* (#:key inputs #:allow-other-keys)
              (let ((gapplication (search-input-file inputs "/bin/gapplication"))