[Python-checkins] CVS: python/dist/src/Doc/perl python.perl,1.118,1.119

Fred L. Drake fdrake@users.sourceforge.net
Fri, 15 Mar 2002 15:21:39 -0800


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

Modified Files:
	python.perl 
Log Message:
Revise the markup related to the grammar productions to increase the
level of predictability.  This is not really "good" markup, but is arguably
better than we had before.
This closes SF bug #523117.


Index: python.perl
===================================================================
RCS file: /cvsroot/python/python/dist/src/Doc/perl/python.perl,v
retrieving revision 1.118
retrieving revision 1.119
diff -C2 -d -r1.118 -r1.119
*** python.perl	13 Mar 2002 02:44:50 -0000	1.118
--- python.perl	15 Mar 2002 23:21:37 -0000	1.119
***************
*** 808,811 ****
--- 808,823 ----
  }
  
+ sub do_cmd_productioncont{
+     local($_) = @_;
+     my $defn = next_argument();
+     return ("<tr valign=\"baseline\">\n"
+             . "    <td>&nbsp;</td>\n"
+             . "    <td>&nbsp;</td>\n"
+             . "    <td><code>"
+             . translate_commands($defn)
+             . "</code></td></tr>"
+             . $_);
+ }
+ 
  sub process_grammar_files{
      my $lang;
***************
*** 848,851 ****
--- 860,864 ----
  sub strip_grammar_markup{
      local($_) = @_;
+     s/\\productioncont/              /g;
      s/\\production(<<\d+>>)(.+)\1/\n\2 ::= /g;
      s/\\token(<<\d+>>)(.+)\1/\2/g;