[Python-checkins] CVS: python/dist/src/Doc/perl l2hinit.perl,1.53,1.54

[Fred L. Drake]

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

Modified Files:
	l2hinit.perl 
Log Message:

Update to use the newly separated values $PACKAGE_VERSION and $RELEASE_INFO.

Normalize all HTML attributes to be written as name="value" instead of
name='value'.


Index: l2hinit.perl
===================================================================
RCS file: /cvsroot/python/python/dist/src/Doc/perl/l2hinit.perl,v
retrieving revision 1.53
retrieving revision 1.54
diff -C2 -r1.53 -r1.54
*** l2hinit.perl	2001/01/09 22:02:10	1.53
--- l2hinit.perl	2001/06/20 21:31:36	1.54
***************
*** 182,191 ****
      if ($PACKAGE_VERSION ne '' && $t_date) {
          return ("<span class=\"release-info\">"
!                 . "Release $PACKAGE_VERSION,"
                  . " documentation updated on $t_date.</span>");
      }
      if ($PACKAGE_VERSION ne '') {
          return ("<span class=\"release-info\">"
!                 . "Release $PACKAGE_VERSION.</span>");
      }
      if ($t_date) {
--- 182,191 ----
      if ($PACKAGE_VERSION ne '' && $t_date) {
          return ("<span class=\"release-info\">"
!                 . "Release $PACKAGE_VERSION$RELEASE_INFO,"
                  . " documentation updated on $t_date.</span>");
      }
      if ($PACKAGE_VERSION ne '') {
          return ("<span class=\"release-info\">"
!                 . "Release $PACKAGE_VERSION$RELEASE_INFO.</span>");
      }
      if ($t_date) {
***************
*** 326,334 ****
  	$key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/;
  	if ($ModulePlatforms{$key} && !$allthesame) {
! 	    $plat = (" <em>(<span class='platform'>$ModulePlatforms{$key}"
  		     . '</span>)</em>');
  	}
  	print MODIDXFILE $moditem . $IDXFILE_FIELD_SEP
!               . "<tt class='module'>$key</tt>$plat###\n";
      }
      close(MODIDXFILE);
--- 326,334 ----
  	$key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/;
  	if ($ModulePlatforms{$key} && !$allthesame) {
! 	    $plat = (" <em>(<span class=\"platform\">$ModulePlatforms{$key}"
  		     . '</span>)</em>');
  	}
  	print MODIDXFILE $moditem . $IDXFILE_FIELD_SEP
!               . "<tt class=\"module\">$key</tt>$plat###\n";
      }
      close(MODIDXFILE);
***************
*** 416,420 ****
  	$the_version = ",\n$t_date";
  	if ($PACKAGE_VERSION) {
! 	    $the_version .= ", Release $PACKAGE_VERSION";
  	}
      }
--- 416,420 ----
  	$the_version = ",\n$t_date";
  	if ($PACKAGE_VERSION) {
! 	    $the_version .= ", Release $PACKAGE_VERSION$RELEASE_INFO";
  	}
      }