So this appears to be close to working one:

```
           (replace 'install
             (lambda args
               (for-each (lambda (solution)
                           (with-directory-excursion solution
(apply (assoc-ref copy:%standard-phases 'install)
                                    #:install-plan
                                    '(("src" "include/qtsolutions"
                                       #:include-regexp ("\\.h$")))
                                    args)))
                         (list
                          "qtlockedfile"
                          "qtpropertybrowser"
                          "qtservice"
                          "qtsingleapplication"
                          "qtsoap"))))
```

I now get "In procedure copy-file: Permission denied".

Regards,
RG.

Attachment: OpenPGP_signature
Description: OpenPGP digital signature

Reply via email to