add new reference macro: \seelink

This commit is contained in:
Fred Drake 2004-01-08 14:57:27 +00:00
parent 91f5cbe264
commit 4f687b3051
3 changed files with 33 additions and 1 deletions

View file

@ -1950,6 +1950,19 @@ sub do_cmd_seetitle{
. $_;
}
sub do_cmd_seelink{
local($_) = @_;
my $url = next_argument();
my $linktext = next_argument();
my $text = next_argument();
my $icon = get_link_icon($url);
return '<dl compact class="seeurl">'
. "\n <dt><a href='$url'"
. "\n >$linktext$icon</a></dt>"
. "\n <dd>$text</dd>\n </dl>"
. $_;
}
sub do_cmd_seeurl{
local($_) = @_;
my $url = next_argument();