texlive[63365] Build/source/texk/makeindexk/scanid.c: makeindex: typo

[commits+takuji at tug.org]

Revision: 63365
          http://tug.org/svn/texlive?view=revision&revision=63365
Author:   takuji
Date:     2022-05-22 15:13:46 +0200 (Sun, 22 May 2022)
Log Message:
-----------
makeindex: typo

Modified Paths:
--------------
    trunk/Build/source/texk/makeindexk/scanid.c

Modified: trunk/Build/source/texk/makeindexk/scanid.c
===================================================================
--- trunk/Build/source/texk/makeindexk/scanid.c	2022-05-22 12:56:22 UTC (rev 63364)
+++ trunk/Build/source/texk/makeindexk/scanid.c	2022-05-22 13:13:46 UTC (rev 63365)
@@ -434,7 +434,7 @@
         }
         if (strspn(no,"ivxlcdm")>1) type_guess[*count] = ROML;
     }  else if (IS_ROMAN_UPPER(no[0]) && IS_ALPHA_UPPER(no[0])
-            && strchr(page_prec,ROMAN_LOWER) && strchr(page_prec,ALPHA_LOWER)) {
+            && strchr(page_prec,ROMAN_UPPER) && strchr(page_prec,ALPHA_UPPER)) {
         if (strspn(no,"IVXLCDM")==1       /* ambiguous */
             && type_guess[*count] != ROMU && type_guess[*count] != ALPU) {
             type_guess[*count] = strspn(no,"IVX")==1 ? ROMU : ALPU;