s/Perl6/Raku in more places

This does not affect setting compilation, spectest or installing
modules with zef, so this feels clean to do now.

src/Perl6/World.nqp

@@ -1493,7 +1493,7 @@ class Perl6::World is HLL::World {
         my $true := self.find_single_symbol('True', :setting-only);
         my $spec := self.find_symbol(['CompUnit', 'DependencySpecification'], :setting-only).new(
             :short-name($module_name),
-            :from(%opts<from> // 'Perl6'),
+            :from(%opts<from> // 'Raku'),
             :auth-matcher(%opts<auth> // $true),
             :api-matcher(%opts<api> // $true),
             :version-matcher(%opts<ver> // $true),

src/core.c/CompUnit.pm6

@@ -1,5 +1,5 @@
 class CompUnit {
-    has Str:D   $.from       is built(:bind) = 'Perl6';
+    has Str:D   $.from       is built(:bind) = 'Raku';
     has Str:D   $.short-name is built(:bind) is required;
     has Version $.version    is built(:bind);
     has Str     $.auth       is built(:bind);

src/core.c/CompUnit/DependencySpecification.pm6

@@ -1,6 +1,6 @@
 class CompUnit::DependencySpecification {
     has str $.short-name  is built(:bind) is required;  # must be native
-    has str $.from        is built(:bind) = 'Perl6';    # must be native
+    has str $.from        is built(:bind) = 'Raku';     # must be native
     has $.version-matcher is built(:bind) = True;
     has $.auth-matcher    is built(:bind) = True;
     has $.api-matcher     is built(:bind) = True;
@@ -10,7 +10,7 @@ class CompUnit::DependencySpecification {
     method Str(CompUnit::DependencySpecification:D: --> Str:D) {
         my $parts := nqp::list_s($!short-name);
         nqp::push_s($parts,":from<$!from>")
-          if $!from ne 'Perl6';
+          if $!from ne 'Raku';
         nqp::push_s($parts,":ver<$!version-matcher>")
           unless nqp::eqaddr($!version-matcher,True);
         nqp::push_s($parts,":auth<$!auth-matcher>")
@@ -25,7 +25,7 @@ class CompUnit::DependencySpecification {
           "CompUnit::DependencySpecification.new(:short-name<$!short-name>"
         );
         nqp::push_s($parts,",:from<$!from>")
-          if $!from ne 'Perl6';
+          if $!from ne 'Raku';
         nqp::push_s($parts,",:version-matcher<$!version-matcher>")
           unless nqp::eqaddr($!version-matcher,True);
         nqp::push_s($parts,",:auth-matcher<$!auth-matcher>")

src/core.c/CompUnit/Repository/FileSystem.pm6

@@ -155,7 +155,7 @@ class CompUnit::Repository::FileSystem
         ));
     }
     multi method candidates(CompUnit::DependencySpecification $spec) {
-        return Empty unless $spec.from eq 'Perl6';
+        return Empty unless $spec.from eq 'Raku';
 
         my $distribution = self!distribution;
 

src/core.c/CompUnit/Repository/Installation.pm6

@@ -389,7 +389,7 @@ sub MAIN(:$name, :$auth, :$ver, *@, *%) {
         ));
     }
     multi method candidates(CompUnit::DependencySpecification $spec) {
-        return Empty unless $spec.from eq 'Perl6';
+        return Empty unless $spec.from eq 'Raku';
 
         # $lookup is a file system resource that acts as a fast meta data lookup for a given module short name.
         my $lookup = self!short-dir.add(nqp::sha1($spec.short-name));