guix-devel
[Top][All Lists]
Advanced

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

Re: Website development questions


From: Luis Felipe López Acevedo
Subject: Re: Website development questions
Date: Sat, 26 Nov 2016 20:02:11 -0500
User-agent: Roundcube Webmail/1.0.6

On 2016-11-26 12:37, address@hidden wrote:
Luis Felipe López Acevedo <address@hidden> skribis:

On 2016-11-23 17:11, address@hidden wrote:
Luis Felipe López Acevedo <address@hidden> skribis:

[...]

‘%patch-path’ is defined like this:

--8<---------------cut here---------------start------------->8---
(define %patch-path
  ;; Define it after '%package-module-path' so that '%load-path'
contains user
  ;; directories, allowing patches in $GUIX_PACKAGE_PATH to be found.
  (make-parameter
   (map (lambda (directory)
          (if (string=? directory %distro-root-directory)
              (string-append directory "/gnu/packages/patches")
              directory))
        %load-path)))
--8<---------------cut here---------------end--------------->8---

So patches are looked up in the “gnu/packages/patches” sub-directory
relative to the load path entry that contains “guix.scm”.

Presumably /home/anonimo/Documentos/guix/ contains guix.scm and so
patches are expected to be in
/home/anonimo/Documentos/guix/gnu/packages/patches.

Is it the case?  Or could it be that only
“4store-fix-buildsystem.patch”
is missing?

hmm, patches are in that location, and the patch not found is actually
there as well:

    $ find -name "4store-fix-buildsystem.patch"
    ./gnu/packages/patches/4store-fix-buildsystem.patch

Damn it, I’m running out of ideas.  :-)

It’s pretty clear that patches are not searched for under
/home/anonimo/Documentos/guix, which could be because you have another
guix.scm in the search path.

Can you try this:

--8<---------------cut here---------------start------------->8---
$ guile
GNU Guile 2.0.13
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.

Enter `,help' for help.
scheme@(guile-user)> (@@ (gnu packages) %distro-root-directory)
$1 = "/home/ludo/soft/share/guile/site/2.0"
scheme@(guile-user)> (search-path %load-path "guix.scm")
$2 = "/home/ludo/soft/share/guile/site/2.0/guix.scm"
scheme@(guile-user)> ,use(gnu packages)
scheme@(guile-user)> (search-patch "4store-fix-buildsystem.patch")
ERROR: Throw to key `srfi-34' with args `(#<condition &message
[message: "4store-fix-buildsystem.patch: patch not found"] 1d40120>)'.

Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
scheme@(guile-user) [1]> ,q
scheme@(guile-user)> (%patch-path)
$3 = ("/home/ludo/src/manao/ludo/guix"
"/home/ludo/.config/guix/personal"
"/home/ludo/.local/share/guile/site/2.0"
"/home/ludo/soft/share/guile/site/2.0/gnu/packages/patches"
"/home/ludo/.guix-profile/share/guile/site/2.0"
"/run/current-system/profile/share/guile/site/2.0"
"/home/ludo/.local/share/guile/site/2.0"
"/home/ludo/soft/share/guile/site/2.0/gnu/packages/patches"
"/home/ludo/.guix-profile/share/guile/site/2.0"
"/run/current-system/profile/share/guile/site/2.0"
"/home/ludo/.guix-profile/share/guile/site/2.0"
"/run/current-system/profile/share/guile/site/2.0"
"/home/ludo/soft/share/guile/2.0"
"/home/ludo/soft/share/guile/site/2.0/gnu/packages/patches"
"/home/ludo/soft/share/guile/site" "/home/ludo/soft/share/guile")
--8<---------------cut here---------------end--------------->8---

Most likely your %distro-root-directory points to that older guix.scm,
where the patch in question is unavailable.


I get this:


--8<---------------cut here---------------end--------------->8---
$ guile
GNU Guile 2.0.13
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.

Enter `,help' for help.
scheme@(guile-user)> (@@ (gnu packages) %distro-root-directory)
$1 = "/home/anonimo/Documentos/guix"
scheme@(guile-user)> (search-path %load-path "guix.scm")
$2 = "/home/anonimo/Documentos/guix/guix.scm"
scheme@(guile-user)> ,use(gnu packages)
scheme@(guile-user)> (search-patch "4store-fix-buildsystem.patch")
ERROR: Throw to key `srfi-34' with args `(#<condition &message [message: "4store-fix-buildsystem.patch: patch not found"] a835320>)'.

Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
scheme@(guile-user) [1]> ,q
scheme@(guile-user)> (%patch-path)
$3 = ("/home/anonimo" "/home/anonimo/.guix-profile/share/guile/site/2.0" "" "/home/anonimo/Documentos/misitio" "/home/anonimo/Documentos/myglab" "/home/anonimo/Documentos/retsi" "/home/anonimo/Documentos/guix/" "/home/anonimo/Documentos/guix-artwork/website" "/gnu/store/dw907d51axf5xcz6qkngdb8mv1x6ja9m-guile-2.0.13/share/guile/2.0" "/gnu/store/dw907d51axf5xcz6qkngdb8mv1x6ja9m-guile-2.0.13/share/guile/site/2.0" "/gnu/store/dw907d51axf5xcz6qkngdb8mv1x6ja9m-guile-2.0.13/share/guile/site" "/gnu/store/dw907d51axf5xcz6qkngdb8mv1x6ja9m-guile-2.0.13/share/guile")
--8<---------------cut here---------------end--------------->8---


Searching my home directory for "guix.scm" files I get this:


--8<---------------cut here---------------end--------------->8---
$ find -name "guix.scm"
./Documentos/guix/build-aux/hydra/guix.scm
./Documentos/guix/guix.scm
--8<---------------cut here---------------end--------------->8---


So, I don't know :)


--
Luis Felipe López Acevedo
http://sirgazil.bitbucket.org/



reply via email to

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