Merge pull request #463 from ugexe/bugfix/462

Use Str for missing uri value
ugexe · Sep 6, 2022 · f4907cc · f4907cc
2 parents 38c427f + da6f815
commit f4907cc
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/lib/Zef/Repository/Ecosystems.rakumod b/lib/Zef/Repository/Ecosystems.rakumod
@@ -102,7 +102,7 @@ class Zef::Repository::Ecosystems does PackageRepository {
         my @candidates = @!distributions.map: -> $dist {
             Candidate.new(
                 dist => $dist,
-                uri  => ($dist.source-url || $dist.meta<support><source> || Nil),
+                uri  => ($dist.source-url || $dist.meta<support><source> || Str),
                 from => self.id,
                 as   => $dist.identity,
             );
@@ -166,7 +166,7 @@ class Zef::Repository::Ecosystems does PackageRepository {
                 }
                 Candidate.new(
                     dist => $_,
-                    uri  => ($uri || $_.source-url || $_.meta<support><source>),
+                    uri  => ($uri || $_.source-url || $_.meta<support><source> || Str),
                     as   => $searchable-identity,
                     from => self.id,
                 );

diff --git a/lib/Zef/Repository/LocalCache.rakumod b/lib/Zef/Repository/LocalCache.rakumod
@@ -98,7 +98,7 @@ class Zef::Repository::LocalCache does PackageRepository {
         my Candidate @candidates = @!distributions.map: -> $dist {
             Candidate.new(
                 dist => $dist,
-                uri  => ($dist.source-url || $dist.meta<support><source> || Nil),
+                uri  => ($dist.source-url || $dist.meta<support><source> || Str),
                 from => self.id,
                 as   => $dist.identity,
             );
@@ -142,7 +142,7 @@ class Zef::Repository::LocalCache does PackageRepository {
             my $matching-candidates := $dists-to-search.grep(*.contains-spec($wanted-spec, :$strict)).map({
                 Candidate.new(
                     dist => $_,
-                    uri  => ($_.source-url || $_.meta<support><source>),
+                    uri  => ($_.source-url || $_.meta<support><source> || Str),
                     as   => $searchable-identity,
                     from => self.id,
                 );