From 241551c16c5222914fc8904889e08e15a40ada9d Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Fri, 11 Aug 2000 20:04:19 +0000
Subject: do_env_cfuncdesc():  Push as much of the generated HTML into one
 place                      as possible for better readability.  Revise a
 comment.

---
 Doc/perl/python.perl | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index b1eb008..bacc8cc 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -644,23 +644,23 @@ sub do_env_cfuncdesc{
     my $idx = make_str_index_entry(
         "<tt class='cfunction'>$function_name()</tt>" . get_indexsubitem());
     $idx =~ s/ \(.*\)//;
-    $idx =~ s/\(\)//;		# ????
+    $idx =~ s/\(\)//;		# ???? - why both of these?
     my $result_rc = get_refcount($function_name, '');
     my $rcinfo = '';
     if ($result_rc eq '+1') {
-        $rcinfo = '<span class="label">Return value:</span>'
-                  . "\n  <span class=\"value\">New reference.</span>";
+        $rcinfo = 'New reference';
     }
     elsif ($result_rc eq '0') {
-        $rcinfo = '<span class="label">Return value:</span>'
-                  . "\n  <span class=\"value\">Borrowed reference.</span>";
+        $rcinfo = 'Borrowed reference';
     }
     elsif ($result_rc eq 'null') {
-        $rcinfo = '<span class="label">Return value:</span>'
-                  . "\n  <span class=\"value\">Always NULL.</span>";
+        $rcinfo = 'Always <tt class="constant">NULL</tt>';
     }
     if ($rcinfo ne '') {
-        $rcinfo = "\n<div class=\"refcount-info\">\n  $rcinfo\n</div>";
+        $rcinfo = (  "\n<div class=\"refcount-info\">"
+                   . "\n  <span class=\"label\">Return value:</span>"
+                   . "\n  <span class=\"value\">$rcinfo.</span>"
+                   . "\n</div>");
     }
     return "<dl><dt>$return_type <b>$idx</b> (<var>$arg_list</var>)\n<dd>"
            . $rcinfo
-- 
cgit v0.12