summaryrefslogtreecommitdiff
path: root/nonguix/utils.scm
diff options
context:
space:
mode:
authorHilton Chain <hako@ultrarare.space>2025-04-04 12:35:58 +0800
committerHilton Chain <hako@ultrarare.space>2025-04-05 07:57:51 +0800
commit6733fbe49c97b343c968e3ba1a6767dc39d1cb7d (patch)
tree6963b8a275323ed42f251458aa36e2751475c436 /nonguix/utils.scm
parent8096527af72b8baffbe43c1dafd3b5bb8083c17b (diff)
nonguix: Add package-with-alias.
* nonguix/utils.scm (package-with-alias): New procedure.
Diffstat (limited to 'nonguix/utils.scm')
-rw-r--r--nonguix/utils.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/nonguix/utils.scm b/nonguix/utils.scm
index 9dc5b21..961d8bd 100644
--- a/nonguix/utils.scm
+++ b/nonguix/utils.scm
@@ -12,6 +12,7 @@
#:use-module (guix packages)
#:use-module (gnu services)
#:export (package-input-grafting
+ package-with-alias
with-transformation))
(define-public (to32 package64)
@@ -96,3 +97,9 @@ matches PRED."
(with-transformation proc obj pred)))
record-fields))))
(_ obj)))
+
+(define (package-with-alias alias pkg)
+ "Return a copy of package PKG called ALIAS."
+ (package
+ (inherit pkg)
+ (name alias)))