Mercurial > cpython-lru_cache-weakref

diff Doc/perl/python.perl @ 7779:1c420699d58a legacy-trunk
Implemented one more special markup item.
author: Fred Drake <fdrake@acm.org>
date: Wed, 01 Apr 1998 22:44:56 +0000
parents: 6bfa650f311d
children: 49f11eb4eb9a
--- a/Doc/perl/python.perl	Wed Apr 01 22:20:14 1998 +0000
+++ b/Doc/perl/python.perl	Wed Apr 01 22:44:56 1998 +0000
@@ -107,6 +107,14 @@
 sub do_cmd_dfn{ &use_italics(@_); }	# make an index entry?
 sub do_cmd_emph{ &use_italics(@_); }
 
+sub do_cmd_newsgroup{
+    local($_) = @_;
+    s/$next_pair_pr_rx//o;
+    my $newsgroup = $2;
+    my $stuff = "<a href=\"news:$newsgroup\"><font face=sans-serif>"
+      . "$newsgroup</font></a>";
+    $stuff . $_;
+}
 
 sub do_cmd_envvar{
     local($_) = @_;