Re: Custom 'install phase

[Julien Lepiller]

Well, look at the location of that "src". You have ("src" (string-append …)). 
That can't work, "src" is a string, not a function (that's what the error 
message is trying to tell you).

Since you need two lists for the install-plan, you can fix that with:

#:install-plan
(list (list "src" (string-append …)))

Le 8 mars 2021 20:09:24 GMT-05:00, Raghav Gururajan <rg@raghavgururajan.name> a 
écrit :
>Hi Julien!
>
>> Maybe quote it? #:include-regexp '("\\.h$")
>
>So I did:
>
>```
>            (replace 'install
>              (lambda _
>                (for-each (lambda (solution)
>                            (with-directory-excursion solution
>                            ((assoc-ref copy:%standard-phases 'install)
>                                        #:install-plan
>                                        (list ("src" (string-append 
>"include/" solution)
>                                       #:include-regexp '("\\.h$"))))))
>                          (list
>                           "qtlockedfile"
>                           "qtpropertybrowser"
>                           "qtservice"
>                           "qtsingleapplication"
>                           "qtsoap"))))
>```
>
>I get Wrong type to apply: "src"
>
>Regards,
>RG.