diff options
| author | Nicholas Clark <nick@ccl4.org> | 2002-12-26 21:16:27 +0000 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2003-01-07 09:20:22 +0000 |
| commit | 35c1215df9ec9cb54402afdda4ed360fdbf58539 (patch) | |
| tree | 428c7477ff36d5e64082475edd727fed8e983bb8 /utf8.c | |
| parent | 6e6ef6b23f1f2cc3827f9559a7259c79757c4116 (diff) | |
| download | perl-35c1215df9ec9cb54402afdda4ed360fdbf58539.tar.gz | |
%_ (was Re: [PATCH] operation on `PL_na' may be undefined)
Message-ID: <20021226211626.GD284@Bagpuss.unfortu.net>
p4raw-id: //depot/perl@18456
Diffstat (limited to 'utf8.c')
| -rw-r--r-- | utf8.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1564,8 +1564,8 @@ Perl_swash_init(pTHX_ char* pkg, char* name, SV *listsv, I32 minbits, I32 none) } if (!SvROK(retval) || SvTYPE(SvRV(retval)) != SVt_PVHV) { if (SvPOK(retval)) - Perl_croak(aTHX_ "Can't find Unicode property definition \"%s\"", - SvPV_nolen(retval)); + Perl_croak(aTHX_ "Can't find Unicode property definition \"%"SVf"\"", + retval); Perl_croak(aTHX_ "SWASHNEW didn't return an HV ref"); } return retval; |