add operators to search

Author: moritz

htmlify.pl

@@ -399,6 +399,12 @@ (Bool :$debug, Bool :$typegraph = False)
     @items.push: $dr.lookup('routine', :by<kind>).grep({!%seen{.name}++}).sort(*.name).map({
         "\{ label: \"{ (.subkind // 'Routine').tclc }: {.name}\", value: \"{.name}\", url: \"{ fix-url(.url) }\" \}"
     });
+    sub escape(Str $s) {
+        $s.trans([</ \\ ">] => [<\\/ \\\\ \\">]);
+    }
+    @items.push: $dr.lookup('operator', :by<kind>).map({
+        qq[\{ label: "$_.human-kind() {escape .name}", value: "{escape .name}", url: "{ fix-url .url }"\}]
+    });
 
     my $items = @items.join(",\n");
     spurt("html/search.html", $template.subst("ITEMS", $items));

lib/Perl6/Documentable.pm

@@ -26,7 +26,7 @@ class Perl6::Documentable {
     }
     method url() {
         $.kind eq 'operator'
-            ?? "/language/operator#$.subkind%20" ~ uri_escape($.name)
+            ?? "/language/operators#$.subkind%20" ~ uri_escape($.name)
             !! "/$.kind/$.name"
             ;
     }