mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 15:36:20 -05:00
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.
This commit is contained in:
parent
fbe17e242b
commit
f69cf40741
1 changed files with 10 additions and 2 deletions
|
@ -430,11 +430,19 @@ (define-syntax define-deprecated-guile3.0-package
|
|||
(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)
|
||||
|
||||
|
|
Loading…
Reference in a new issue