[Python-checkins] python/dist/src/Doc/perl l2hinit.perl,1.66,1.67

[fdrake@users.sourceforge.net]

Update of /cvsroot/python/python/dist/src/Doc/perl
In directory usw-pr-cvs1:/tmp/cvs-serv20638

Modified Files:
	l2hinit.perl 
Log Message:
Minor rearranging.


Index: l2hinit.perl
===================================================================
RCS file: /cvsroot/python/python/dist/src/Doc/perl/l2hinit.perl,v
retrieving revision 1.66
retrieving revision 1.67
diff -C2 -d -r1.66 -r1.67
*** l2hinit.perl	30 Oct 2002 17:00:58 -0000	1.66
--- l2hinit.perl	30 Oct 2002 19:55:23 -0000	1.67
***************
*** 635,638 ****
--- 635,639 ----
              #  : ''),
              $more_links_mark,
+             "\n",
              ($CHARSET && $HTML_VERSION ge "2.1"
               ? ('<meta http-equiv="Content-Type" content="text/html; '
***************
*** 642,648 ****
               ? "<meta name='aesop' content='$AESOP_META_TYPE'>\n" : ''));
      }
! 
!     if (!$charset && $CHARSET) { $charset = $CHARSET; $charset =~ s/_/\-/go; }
! 
      join('',
           $MY_PARTIAL_HEADER,
--- 643,650 ----
               ? "<meta name='aesop' content='$AESOP_META_TYPE'>\n" : ''));
      }
!     if (!$charset && $CHARSET) {
!         $charset = $CHARSET;
!         $charset =~ s/_/\-/go;
!     }
      join('',
           $MY_PARTIAL_HEADER,