diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-05-11 13:01:11 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-05-11 13:01:11 +0200 |
commit | f69cf40741f6ba4e79a5e8f6dae407d96f4433ec (patch) | |
tree | 2eb7f070bdf9e64d3d2098e5626cfc46ac9a2648 | |
parent | fbe17e242b539004e3aa1458c2e9ccbc635ddfb8 (diff) | |
download | patches-f69cf40741f6ba4e79a5e8f6dae407d96f4433ec.tar patches-f69cf40741f6ba4e79a5e8f6dae407d96f4433ec.tar.gz |
gnu: 'define-deprecated-guile3.0-package' actually exports <package> objects.
Until now, that macro would expand to something like:
(export guile3.0-git)
where 'guile3.0-git' is actually a macro (produced by
'define-deprecated'), which would thus be skipped by 'fold-packages'.
Consequently, "guix install guile3.0-git" would say that no such package
exists.
* gnu/packages/guile.scm (define-deprecated-guile3.0-package): Add
'old-name' and export it.
-rw-r--r-- | gnu/packages/guile.scm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm index f17a9aaf59..ef1e19c6b8 100644 --- a/gnu/packages/guile.scm +++ b/gnu/packages/guile.scm @@ -430,11 +430,19 @@ GNU@tie{}Guile. Use the @code{(ice-9 readline)} module and call its (datum->syntax #'name (string->symbol - (->guile (symbol->string (syntax->datum #'name))))))) + (->guile (symbol->string (syntax->datum + #'name)))))) + (old-name + ;; XXX: This is the name generated by + ;; 'define-deprecated'. + (datum->syntax + #'name + (symbol-append '% (syntax->datum #'name) + '/deprecated)))) #'(begin (define-deprecated name package (deprecated-package package-name package)) - (export name)))))))) + (export old-name)))))))) (define-deprecated-guile3.0-package guile3.0-readline) |