Re: 09/10: gnu: Add sbcl-cl-xmlspam.

Re: 09/10: gnu: Add sbcl-cl-xmlspam.

[Ludovic Courtès]

Hello Pierre!

guix-commits@gnu.org skribis:

> commit ec982546941b59fdd14e0b08f023baf2e75d71a3
> Author: Pierre Neidhardt <mail@ambrevar.xyz>
> Date:   Fri Jul 5 12:33:35 2019 +0200
>
>     gnu: Add sbcl-cl-xmlspam.
>     
>     * gnu/packages/lisp.scm (sbcl-cl-xmlspam): New variable.

[...]

> +    (license #f)))

Could you adjust the ‘license’ field?

Thanks for all the CL packages!

Ludo’.

Re: 09/10: gnu: Add sbcl-cl-xmlspam.

[Pierre Neidhardt]

[-- Attachment #1: Type: text/plain, Size: 208 bytes --]

Sure, but actually what's the good practice for unlicensed packages?
cl-xmlspam is one of those old forsaken source archives without any
license whatsoever.

-- 
Pierre Neidhardt
https://ambrevar.xyz/

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 487 bytes --]

Re: 09/10: gnu: Add sbcl-cl-xmlspam.

[Ludovic Courtès]

Hi Pierre,

Pierre Neidhardt <mail@ambrevar.xyz> skribis:

> Sure, but actually what's the good practice for unlicensed packages?
> cl-xmlspam is one of those old forsaken source archives without any
> license whatsoever.

Then copyright applies the usual way, which means it’s non-free.  :-/

Could you get in touch with the author(s) and see whether they’d be
willing to publish it under a free license?

In the meantime I’ve reverted ‘sbcl-cl-xmlspam’ and ‘sbcl-dbus’ (which
depends on it) because the #f ‘license’ field of ‘sbcl-cl-xmlspam’ was
breaking evaluation:

  https://berlin.guixsd.org/jobset/guix-master

The error was actually a ‘match’ error in (@@ (gnu ci) package->alist),
which is not surprising; what’s more surprising is that the actual error
happened in the inferior, but it was re-thrown by the caller, which
means the backtrace was fairly confusing:

--8<---------------cut here---------------start------------->8---
Backtrace:
           6 (apply-smob/1 #<catch-closure 17322c0>)
In ice-9/boot-9.scm:
    705:2  5 (call-with-prompt _ _ #<procedure default-prompt-handle?>)
In ice-9/eval.scm:
    619:8  4 (_ #(#(#<directory (guile-user) 17e8140>)))
   293:34  3 (_ #(#(#(#(#(#(#(#(#(#(#(?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?))
    159:9  2 (_ _)
    159:9  1 (_ _)
In guix/utils.scm:
    649:8  0 (call-with-temporary-directory _)

guix/utils.scm:649:8: In procedure call-with-temporary-directory:
Throw to key `match-error' with args `("match" "no matching pattern" #f)'.
--8<---------------cut here---------------end--------------->8---

‘call-with-temporary-directory’ is tail-called from
‘inferior-eval-with-store’…

Ludo’.