07/07: gnu: qucs: Patch bootstrapping scripts.

[Danny Milosavljevic]

dannym pushed a commit to branch master
in repository guix.

commit 5e88194661ccd499bd36e27bd9857c81328cd242
Author: Danny Milosavljevic <address@hidden>
Date:   Thu Jun 7 21:38:37 2018 +0200

    gnu: qucs: Patch bootstrapping scripts.
    
    * gnu/packages/engineering.scm (qucs)[arguments]<#:phases>[patch-bootstrap]:
    New phase.
---
 gnu/packages/engineering.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index b40599d..bacf161 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -1531,6 +1531,14 @@ parallel computing platforms.  It also supports serial 
execution.")
       (arguments
        `(#:phases
          (modify-phases %standard-phases
+           (add-before 'bootstrap 'patch-bootstrap
+             (lambda _
+               (for-each patch-shebang
+                         '("bootstrap"
+                           "qucs/bootstrap"
+                           "qucs-doc/bootstrap"
+                           "qucs-core/bootstrap"))
+               #t))
            (add-before 'configure 'patch-configure
              (lambda* (#:key inputs #:allow-other-keys)
                (substitute* "qucs/configure"