texlive[66908] Build/source/texk/web2c/cwebdir: [CWEB] Reduce

[commits+ascherer at tug.org]

Revision: 66908
          http://tug.org/svn/texlive?view=revision&revision=66908
Author:   ascherer
Date:     2023-04-21 07:40:43 +0200 (Fri, 21 Apr 2023)
Log Message:
-----------
[CWEB] Reduce whitespace in output section.

Although it has been this way 'forever' and is neatly documented in
CWEAVE.W, I really don't like the double space between the output file
name and the section number in @(secondary output@>, both in code and in
inner TeX mode. Instead of a full ' ' blank, we insert an '\thinspace',
which gives a slightly different appearence than in normal section
names, but isn't as harsh on the eye.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/cwebdir/ChangeLog
    trunk/Build/source/texk/web2c/cwebdir/cweave.w

Modified: trunk/Build/source/texk/web2c/cwebdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-04-20 23:49:36 UTC (rev 66907)
+++ trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-04-21 05:40:43 UTC (rev 66908)
@@ -1,3 +1,7 @@
+2023-04-20  Andreas Scherer  <https://ascherer.github.io>
+
+	* cweave.w: Reduce whitespace in output section.
+
 2023-04-05  Andreas Scherer  <https://ascherer.github.io>
 
 	* cwebmac.tex: Revert a few \ifacro from version 4.8.

Modified: trunk/Build/source/texk/web2c/cwebdir/cweave.w
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/cweave.w	2023-04-20 23:49:36 UTC (rev 66907)
+++ trunk/Build/source/texk/web2c/cwebdir/cweave.w	2023-04-21 05:40:43 UTC (rev 66908)
@@ -2124,7 +2124,7 @@
  \.{\\X}$n$\.:translated section name\.{\\X}&maybe\cr
 \.{@@(@q)@>}\thinspace section name\thinspace\.{@@>}&|section_scrap|:
  \.{\\X}$n$\.{:\\.\{}section name with special characters
-      quoted\.{\ \}\\X}&maybe\cr
+      quoted\.{\\,\}\\X}&maybe\cr
 \.{/*}\thinspace comment\thinspace\.{*/}&|insert|: |cancel|
       \.{\\C\{}translated comment\.\} |force|&no\cr
 \.{//}\thinspace comment&|insert|: |cancel|
@@ -4093,7 +4093,7 @@
 if (an_output) out_str("\\.{"@q}@>);
 @.\\.@>
 @<Output the text of the section name@>@;
-if (an_output) out_str(@q{@>" }");
+if (an_output) out_str(@q{@>"\\,}");
 out_str("\\X");
 
 @ @<Output the text...@>=