]> perl5.git.perl.org Git - perl5.git/commitdiff This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Configure: Fix compilation error on some systems 22799/head
authorKarl Williamson <[email protected]>
Sat, 30 Nov 2024 14:51:59 +0000 (07:51 -0700)
committerKarl Williamson <[email protected]>
Sat, 30 Nov 2024 15:07:57 +0000 (08:07 -0700)
See https://github.com/Perl/perl5/issues/22793

This typo in a printf format causes some C compilations to fail; others
to just warn.  However stderr is redirected to /dev/null, so we weren't
aware of this issue.

When it fails, other issues cause perl to not be usable on the system.

Configure

index 4da7088bffdb3488102a14a986b6f7c772cd5267..72c3794dd664c60cd9cdada8082d1de7a5c611c2 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -17724,7 +17724,7 @@ main (const int argc, const char ** argv)
         /* Here isn't name=value pairs.  Find the position of the alternate */
         const char * alt_pos = strstr(lc_all, alternate);
         if (! alt_pos) {
-            fprintf(stderr, "Couldn't find '%s' in '%'s\n", alternate, lc_all);
+            fprintf(stderr, "Couldn't find '%s' in '%s'\n", alternate, lc_all);
             return 1;
         }