diff options
| -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) |