aboutsummaryrefslogtreecommitdiff
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
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
-rwxr-xr-xsrc/bin/paku5
-rw-r--r--src/org/euandre/packages.scm12
2 files changed, 9 insertions, 8 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)
diff --git a/src/org/euandre/packages.scm b/src/org/euandre/packages.scm
index 19b9b23..8c97e57 100644
--- a/src/org/euandre/packages.scm
+++ b/src/org/euandre/packages.scm
@@ -9,8 +9,8 @@
(define-public git-permalink-0-1-0
(package
- (name "git-permalink-0-1-0")
- (version "v0.1.0")
+ (name "git-permalink")
+ (version "0.1.0")
(source
(origin
(method url-fetch)
@@ -38,8 +38,8 @@ config.")
(define-public git-permalink-0-2-0
(package
- (name "git-permalink-0-2-0")
- (version "v0.2.0")
+ (name "git-permalink")
+ (version "0.2.0")
(source
(origin
(method url-fetch)
@@ -67,8 +67,8 @@ config.")
(define-public remembering-0-1-2
(package
- (name "remembering-0-1-2")
- (version "v0.1.2")
+ (name "remembering")
+ (version "0.1.2")
(source
(origin
(method url-fetch)