Nikita Karetnikov skribis:
>>> +(copy-file prog prog-real)
>
>> You lack a (chmod prog-real #o755), I think.
>
> Are you sure?
>
> If 'prog' is an executable, 'prog-real' will be an executable too.
>
> scheme@(guile-user)> (open-file "foo" "w")
> $1 = #
> scheme@(guile-user)> (chmod "foo" #o7
>> +(copy-file prog prog-real)
> You lack a (chmod prog-real #o755), I think.
Are you sure?
If 'prog' is an executable, 'prog-real' will be an executable too.
scheme@(guile-user)> (open-file "foo" "w")
$1 = #
scheme@(guile-user)> (chmod "foo" #o755)
scheme@(guile-user)> (copy-file "foo" "ba
Nikita Karetnikov skribis:
>> I wouldn’t bother, though, because it will be used in contexts where
>> there’s no risk of ‘prog’ being used while we’re fiddling with it
>> (single-threaded, after ‘make install’).
>
> Better safe than sorry. So I added '.PROG-tmp'.
Good. :-)
> +(copy-file p
ore pushing?
Is it OK? Can I push?
From 0ffa1b39556c9f7b0b18a864080df2d18651ed1e Mon Sep 17 00:00:00 2001
From: Nikita Karetnikov
Date: Sun, 3 Mar 2013 12:40:49 +
Subject: [PATCH] utils: Add 'wrap-program'.
* guix/build/utils.scm (wrap-program): New procedure.