Hi,

On Mon, 27 Jun 2022 at 22:22, calcium via <[email protected]> wrote:
> I tried using the procedures text-file* and plain-file but I can't
> manage to make it works.

Well, I am not sure it is what you are looking for.  There are from
G-expressions [1] when you probably just want install some files.


1: <https://guix.gnu.org/manual/devel/en/guix.html#G_002dExpressions>


>        (replace
>         'install
>         (lambda* (#:key outputs #:allow-other-keys)
>                  ;; The package's Makefile doesn't provide an "install"
>                  ;; rule so do it by ourselves.
>                  (let ((filter-dir
>                         (string-append (assoc-ref outputs "out")
>                                        "/lib/cups/filter"))
>                        (ppd-dir
>                         (string-append (assoc-ref outputs "out")
>                                        "/share/ppd/cupsfilters")))
>                    ;; (install-file
>                    ;;  (plain-file "brother_lpdwrapper_printer-model"
>                    ;;              "ldwrapper string/content of file"))

For instance, instead of…

>                    ;; (install-file
>                    ;;  (plain-file "brother-printer-model-cups-en.ppd"
>                    ;;              ".ppd string/content of file")
>                    ;;  ppd-dir)
>                    )
>                  #t)))))))

maybe this:

        (install-file
          "brother-printer-model-cups-en.ppd"
          ppd-dir)

is what you would like.  Is it?


Hope that helps,
simon

Reply via email to