From: Fred Drake <fdrake@acm.org>
Date: Wed, 1 Apr 1998 22:44:56 +0000 (+0000)
Subject: Implemented one more special markup item.
X-Git-Tag: v1.5.1~275
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=1a7af3959b56a503692d15329e1ff52d947fc02c;p=python

Implemented one more special markup item.
---

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 3536f32d6e..19f5ee4b1a 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -107,6 +107,14 @@ sub do_cmd_var{ &use_italics(@_); }
 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($_) = @_;