ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-23 19:19:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: 'define-deprecated-guile3.0-package' actually exports <package> objects.

Browse source 
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:
Ludovic Courtès 2020-05-11 13:01:11 +02:00
parent fbe17e242b
commit f69cf40741
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/guile.scm
View file

@ -430,11 +430,19 @@ (define-syntax define-deprecated-guile3.0-package
(datum->syntax (datum->syntax
#'name #'name
(string->symbol (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 #'(begin
(define-deprecated name package (define-deprecated name package
(deprecated-package package-name package)) (deprecated-package package-name package))
(export name)))))))) (export old-name))))))))
(define-deprecated-guile3.0-package guile3.0-readline) (define-deprecated-guile3.0-package guile3.0-readline)