diff options
| author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2013-10-04 16:48:40 +0100 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2014-06-12 14:27:20 +1000 |
| commit | c2b90b61b50912ff59d36bd0dc279930c2b76bf2 (patch) | |
| tree | 5fa5148a2822eb21f9de30c39490d758ffd524f9 /ext/DynaLoader/dl_vms.xs | |
| parent | 2b2126557600d964281cf37893d936e401b1a5cc (diff) | |
| download | perl-c2b90b61b50912ff59d36bd0dc279930c2b76bf2.tar.gz | |
Change newSVpvn("…", …) to newSVpvs("…")
The dual-life dists affected use Devel::PPPort, so can safely use
newSVpvs() even though it wasn't added until Perl v5.8.9.
Diffstat (limited to 'ext/DynaLoader/dl_vms.xs')
| -rw-r--r-- | ext/DynaLoader/dl_vms.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/DynaLoader/dl_vms.xs b/ext/DynaLoader/dl_vms.xs index 6eb2c546b2..23cf11b97d 100644 --- a/ext/DynaLoader/dl_vms.xs +++ b/ext/DynaLoader/dl_vms.xs @@ -368,7 +368,7 @@ CLONE(...) * using Perl variables that belong to another thread, we create our * own for this thread. */ - MY_CXT.x_dl_last_error = newSVpvn("", 0); + MY_CXT.x_dl_last_error = newSVpvs(""); dl_require_symbols = get_av("DynaLoader::dl_require_symbols", GV_ADDMULTI); #endif |