From 4f9ed2f3e82b70aaccbf652bb5fd5bba472da8a7 Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Wed, 20 Apr 2022 11:01:33 +0100 Subject: refactor --- lib/Katana/HTML/Generate.rakumod | 19 ------------------- 1 file changed, 19 deletions(-) (limited to 'lib/Katana/HTML/Generate.rakumod') diff --git a/lib/Katana/HTML/Generate.rakumod b/lib/Katana/HTML/Generate.rakumod index fb020b4..74e1c4b 100644 --- a/lib/Katana/HTML/Generate.rakumod +++ b/lib/Katana/HTML/Generate.rakumod @@ -1,22 +1,3 @@ use v6.d; unit module Katana::HTML::Generate:api<1>; - -multi sub generate-from-tags(Str $doctype, @tags) is export { - say $doctype; - generate-from-tags @tags; -} - -multi sub generate-from-tags(@tags) is export { - my @sgat; # tags spelled in reverse. - for @tags -> $tag { - say $tag.open; - say $tag.text if $tag.has-text; - unshift @sgat, $tag; - } - for @sgat -> $tag { - say $tag.close; - generate-from-tags $tag.succ if $tag.has-succ; - } -} - -- cgit v1.2.3