From a4c6423aeb00c000b83d307f688966affcb4b501 Mon Sep 17 00:00:00 2001
From: Antonio <antoniogamiz10@gmail.com>
Date: Tue, 13 Aug 2019 22:23:54 +0200
Subject: [PATCH] fix: change tg-template in typegraph representations

---
 META6.json                                |  1 +
 docs/Type/Perl6/Documentable.pod6         | 13 ++++++-------
 lib/Perl6/Documentable/DocPage/Source.pm6 |  2 +-
 3 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/META6.json b/META6.json
index a314370..ffbfe8f 100644
--- a/META6.json
+++ b/META6.json
@@ -49,6 +49,7 @@
     "template/head.html",
     "template/header.html",
     "template/footer.html",
+    "template/tg-fragment.html",
     "template/search_template.js",
     "config.json"
   ],
diff --git a/docs/Type/Perl6/Documentable.pod6 b/docs/Type/Perl6/Documentable.pod6
index ab43182..8e6ec8c 100644
--- a/docs/Type/Perl6/Documentable.pod6
+++ b/docs/Type/Perl6/Documentable.pod6
@@ -99,13 +99,12 @@ enum Kind is export (Type      => "type"     , Language => "language",
 
 =end code
 
-=table
-    Kind::Type Complete pod marked with C<:kind("type")>
-    Kind::Language Complete pod marked with C<:kind("language")>
-    Kind::Programs Complete pod marked with C<:kind("programs")>
-    Kind::Syntax Pod fragment from a complete pod
-    Kind::Routine Pod fragment from a complete pod
-    Kind::Reference Element generated via "X<>"
+=item Kind::Type Complete pod marked with C<:kind("type")>.
+=item Kind::Language Complete pod marked with C<:kind("language")>.
+=item Kind::Programs Complete pod marked with C<:kind("programs")>.
+=item Kind::Syntax Pod fragment from a complete pod.
+=item Kind::Routine Pod fragment from a complete pod.
+=item Kind::Reference Element generated via "X<>".
 
 You can assign the first three values manually, setting the metadata of a pod section:
 
diff --git a/lib/Perl6/Documentable/DocPage/Source.pm6 b/lib/Perl6/Documentable/DocPage/Source.pm6
index 34332dd..ad650d8 100644
--- a/lib/Perl6/Documentable/DocPage/Source.pm6
+++ b/lib/Perl6/Documentable/DocPage/Source.pm6
@@ -48,7 +48,7 @@ class Perl6::Documentable::DocPage::Source::Type
         # zef relative paths to resources
         my $filename = "resources/template/tg-fragment.html".IO.e   ??
                        "resources/template/tg-fragment.html"        !!
-                       %?RESOURCES<template/head.html>;
+                       %?RESOURCES<template/tg-fragment.html>;
         state $template = slurp $filename;
         my $svg;
         if ("html/images/type-graph-$podname.svg".IO.e) {