1 files changed, 18 insertions, 0 deletions
diff --git a/w3m-doc/sample/html.wd b/w3m-doc/sample/html.wd
new file mode 100644
index 0000000..1b1d7f2
--- /dev/null
+++ b/w3m-doc/sample/html.wd
@@ -0,0 +1,18 @@
+@code
+sub URL {
+  $_[0]->CHECK(qw(url));
+  $_[0]->{url};
+}
+sub LINK {
+  $_[0]->CHECK(qw(url title));
+  "<A HREF=\"$_[0]->{url}\">$_[0]->{title}</A>";
+}
+sub LINK_SEC {
+  $_[0]->CHECK(qw(url section title));
+  "<A HREF=\"$_[0]->{url}\">$_[0]->{section} $_[0]->{title}</A>";
+}
+sub MAILTO {
+  $_[0]->CHECK(qw(address name));
+  "<A HREF=\"mailto:$_[0]->{address}\">$_[0]->{name}</A>";
+}
+@end