This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: Clarify a debugging statement
authorKarl Williamson <khw@cpan.org>
Sat, 9 Apr 2016 20:47:21 +0000 (14:47 -0600)
committerKarl Williamson <khw@cpan.org>
Mon, 9 May 2016 17:24:38 +0000 (11:24 -0600)
locale.c

index bf8713a..b304a28 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -119,7 +119,7 @@ Perl_set_numeric_radix(pTHX)
     else
        PL_numeric_radix_sv = NULL;
 
-    DEBUG_L(PerlIO_printf(Perl_debug_log, "Locale radix is %s, ?UTF-8=%d\n",
+    DEBUG_L(PerlIO_printf(Perl_debug_log, "Locale radix is '%s', ?UTF-8=%d\n",
                                           (PL_numeric_radix_sv)
                                            ? SvPVX(PL_numeric_radix_sv)
                                            : "NULL",