diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index 4033c62687f..6dfa018896e 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -1288,6 +1288,17 @@ sub do_cmd_seerfc{ . $_; } +sub do_cmd_seeurl{ + local($_) = @_; + my $url = next_argument(); + my $text = next_argument(); + return '
' + . "\n
$url" + . "\n
$text\n
" + . $_; +} + sub do_cmd_seetext{ local($_) = @_; my $content = next_argument();