add simple link and poplink format tests

diff --git a/t/010-modules/050-format.t b/t/010-modules/050-format.t
index 678ca64557cbf70164d693ef611a5258eb374def..8d28f441916ea1dbb230a3398aab6b18fa9e6fa9 100644 (file)
--- a/t/010-modules/050-format.t
+++ b/t/010-modules/050-format.t
@@ -1,6 +1,6 @@
 #!perl -w
 use strict;
-use Test::More tests => 134;
+use Test::More tests => 136;
 
 sub format_test($$$;$);
 sub noformat_test($$$;$);
@@ -31,6 +31,8 @@ SKIP: {
   format_test 'mark[hello]', '<p><mark>hello</mark></p>', 'mark';
   format_test 'mark[|hello]', '<p><mark>hello</mark></p>', 'mark empty class';
   format_test 'mark[foo|hello]', '<p><mark class="foo">hello</mark></p>', 'mark with class';
+  format_test 'link[foo|hello]', '<p><a href="foo">hello</a></p>', 'anchor';
+  format_test 'poplink[foo|hello]', '<p><a href="foo" target="_blank">hello</a></p>', 'anchor with popup';
   format_test <<IN, <<OUT, 'blockquote', 'both';
 blockquote[hello]
 IN