diff options
| -rw-r--r-- | guix/deprecation.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/guix/deprecation.scm b/guix/deprecation.scm index 09a27789c9..8147a01e24 100644 --- a/guix/deprecation.scm +++ b/guix/deprecation.scm @@ -25,6 +25,7 @@ define-deprecated/public define-deprecated/alias + define-deprecated/public-alias warn-about-old-daemon warn-about-deprecation)) @@ -124,3 +125,10 @@ This will write a deprecation warning to GUIX-WARNING-PORT." (id (identifier? #'id) #'replacement))))) + +(define-syntax-rule (define-deprecated/public-alias deprecated replacement) + "Like define-deprecated/alias, but exporting DEPRECATED. +It is assumed, that REPLACEMENT is already public." + (begin + (define-deprecated/alias deprecated replacement) + (export deprecated))) |