Skip to content

Instantly share code, notes, and snippets.

@gfldex
Created July 26, 2013 12:40
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gfldex/6088554 to your computer and use it in GitHub Desktop.
Save gfldex/6088554 to your computer and use it in GitHub Desktop.
subset HTML of Str;
subset HEAD of Str;
subset BODY of Str;
sub body( --> BODY ) { '<body></body>' }
sub head( --> HEAD ) { '<head></head>' }
subset HTML-nodes of Cool where HEAD|BODY;
# sub html(HTML-nodes @nodes, :$lang?, :$xml-lang?, :$dir? where * eq 'ltr'
sub html(HTML-nodes @nodes --> HTML) {
}
html([head, body]);
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment