[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Trivial build system

From: Andreas Enge
Subject: Re: Trivial build system
Date: Sun, 11 Jan 2015 17:44:46 +0100
User-agent: Mutt/1.5.23 (2014-03-12)

On Sun, Jan 11, 2015 at 10:33:04AM -0500, David Thompson wrote:
> Rather than deleting the other known phases, how about just selecting
> the 2 phases you are interested in?
>   (map (cut assq <> %standard-phases)
>        '(unpack patch-source-shebangs))

Thanks a lot, that did the trick (together with adding the 'set-paths phase),
and I learnt a bit of scheme at the same time! For the record, the final code
snippet looks like this:
    `(#:modules ((guix build gnu-build-system)
                 (guix build utils)
                 (srfi srfi-26))
      #:imported-modules ((guix build gnu-build-system)
                          (guix build utils))
         'patch-source-shebangs 'install
         (lambda* (#:key outputs #:allow-other-keys)
           (let ((out (assoc-ref outputs "out")))
             (mkdir-p out)
             (zero? (system* "mv" "tlpkg" out))))
         (map (cut assq <> %standard-phases)
              '(set-paths unpack patch-source-shebangs)))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]