summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir/common.w
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2023-07-09 14:25:42 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2023-07-09 14:25:42 +0000
commitcdaff020cb2884f02082ba4cae541d8b63d7a1cc (patch)
tree1ff928d95d0b56d2bf1236caa8f3456ea79f5236 /Build/source/texk/web2c/cwebdir/common.w
parent64c0c3d43bcf088861112ebe4b40323cc7416a2b (diff)
[CWEB] Don't create index/section file names.
Make section 79 more symmetric with respect to 'dot_pos==NULL'. In any case no index/section file names are created if option '-x' is used. git-svn-id: svn://tug.org/texlive/trunk@67589 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/common.w')
-rw-r--r--Build/source/texk/web2c/cwebdir/common.w12
1 files changed, 5 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/cwebdir/common.w b/Build/source/texk/web2c/cwebdir/common.w
index 0a7b9616a05..c3d82f3c942 100644
--- a/Build/source/texk/web2c/cwebdir/common.w
+++ b/Build/source/texk/web2c/cwebdir/common.w
@@ -1228,17 +1228,15 @@ after the dot. We must check that there is enough room in
@<Complain about argument length@>@;
if (dot_pos==NULL) {
sprintf(tex_file_name,"%s.tex",*argv);
- sprintf(idx_file_name,"%s.idx",*argv);
- sprintf(scn_file_name,"%s.scn",*argv);
sprintf(C_file_name,"%s.c",*argv);
} else {
strcpy(tex_file_name,*argv);
strcpy(C_file_name,*argv);
- if (make_xrefs) { /* indexes will be generated */
- *dot_pos='\0';
- sprintf(idx_file_name,"%s.idx",*argv);
- sprintf(scn_file_name,"%s.scn",*argv);
- }
+ *dot_pos='\0'; /* string now ends where the dot was */
+ }
+ if (make_xrefs) { /* indexes will be generated */
+ sprintf(idx_file_name,"%s.idx",*argv);
+ sprintf(scn_file_name,"%s.scn",*argv);
}
found_out=true;
}