bluto

commit c4462b21b8023dfd24cac597dcf8983f28ff535f
parent 08d880d73df10b284844132139206ad021a23e8c
Author: lash <dev@holbrook.no>
Date:   Mon, 16 Sep 2024 00:16:02 +0100

Remove double use of project name in out paths

Diffstat:
M
Bluto.pm
 | 
2
+-
M
Bluto/Archive.pm
 | 
2
+-
M
Bluto/RSS.pm
 | 
1
+

3 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/Bluto.pm b/Bluto.pm
@@ -338,7 +338,7 @@ sub create_announce {
 		return undef;
 	}
 
-	my $fp_base = File::Spec->catfile(Bluto::Tree->announce_path, $m_main{slug});
+	my $fp_base = File::Spec->catfile(Bluto::Tree->announce_path);
 	make_path($fp_base);
 	my $fp = File::Spec->catfile($fp_base, $m_main{slug} . '-' . $m_main{version} . '.bluto.txt');
 	open($f, '>', $fp) or (error('cannot open announce file: ' . $!) && return undef);
diff --git a/Bluto/Archive.pm b/Bluto/Archive.pm
@@ -70,7 +70,7 @@ sub create {
 	}
 	chomp($rev);
 	my $targz = $targz_stem . '+build.' . $rev . '.tar.gz';
-	my $targz_base = File::Spec->catfile(Bluto::Tree->release_path, $release->{slug});
+	my $targz_base = File::Spec->catfile(Bluto::Tree->release_path);
 	make_path($targz_base);
 	$targz_local = File::Spec->catfile($targz_base, $targz);
 
diff --git a/Bluto/RSS.pm b/Bluto/RSS.pm
@@ -48,6 +48,7 @@ sub process {
 			title => $release->{name},
 			link => $release->{uri},
 			description => $release->{summary},
+			guid => $release->{uri},
 			dc => {
 				date => DateTime->now()->stringify(),
 				creator => $release->{author_maintainer}[0],