aboutsummaryrefslogtreecommitdiff
path: root/src/bin/paku
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2023-03-22 17:06:00 -0300
committerEuAndreh <eu@euandre.org>2023-03-22 17:06:00 -0300
commitb62c88aba03eb80ef7df80d6c27696aec6e73c00 (patch)
tree802b56393720977609b6c1b30c95108fd218fcac /src/bin/paku
parentsrc/bin/paku: Show better versions on HTML (diff)
downloadpackage-repository-b62c88aba03eb80ef7df80d6c27696aec6e73c00.tar.gz
package-repository-b62c88aba03eb80ef7df80d6c27696aec6e73c00.tar.xz
src/bin/paku: Improve name of package variants
Diffstat (limited to '')
-rwxr-xr-xsrc/bin/paku5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/bin/paku b/src/bin/paku
index 1e7753e..67d92f3 100755
--- a/src/bin/paku
+++ b/src/bin/paku
@@ -258,6 +258,7 @@ sub emit_guix() {
for my $pkg (@{$json->{packages}}) {
my $long = $pkg->{'long-description'};
$long =~ s/^(.)/ $1/gm;
+ my $ver = $pkg->{version} =~ s/^v//r;
my $name = $pkg->{name} . (
$pkg->{label} eq 'latest' ? '' : "-$pkg->{label}"
@@ -266,8 +267,8 @@ sub emit_guix() {
print <<~EOF;
(define-public $name
(package
- (name "$name")
- (version "$pkg->{version}")
+ (name "$pkg->{name}")
+ (version "$ver")
(source
(origin
(method url-fetch)