diff options
| author | Nicholas Clark <nick@ccl4.org> | 2002-12-10 19:59:18 +0000 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-12-23 05:08:49 +0000 |
| commit | 0773b1f011791ecd1735dad376fcc533a738a2f0 (patch) | |
| tree | 90fea6b8aefc6b621236dcebfeef20d32bcfc15f /universal.c | |
| parent | f102516803701091b282e6039ff74d44a59d87f0 (diff) | |
| download | perl-0773b1f011791ecd1735dad376fcc533a738a2f0.tar.gz | |
operation on `PL_na' may be undefined
Message-ID: <20021210195917.GJ288@Bagpuss.unfortu.net>
p4raw-id: //depot/perl@18341
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/universal.c b/universal.c index 533d84399f..9764ee4c73 100644 --- a/universal.c +++ b/universal.c @@ -338,8 +338,8 @@ XS(XS_UNIVERSAL_VERSION) req = new_version(req); if ( vcmp( SvRV(req), SvRV(sv) ) > 0 ) - Perl_croak(aTHX_ "%s version %s required--this is only version %s", - HvNAME(pkg), SvPV(req,PL_na), SvPV(sv,PL_na)); + Perl_croak(aTHX_ "%s version %_ required--this is only version %_", + HvNAME(pkg), req, sv); } ST(0) = sv; |