diff options
| author | Lukas Mai <l.mai@web.de> | 2011-11-06 20:47:00 +0100 |
|---|---|---|
| committer | Ailin Nemui <ailin@esf51.localdomain> | 2014-06-24 16:45:55 +0200 |
| commit | 7dbb8efdde3720fd15f06de088848259e24e3397 (patch) | |
| tree | a9089a585049399bfca289b5fe89f0642e86c1bd /src/perl/perl-core.c | |
| parent | c26a634fe6f65f44cdd036d2657fe4335ed6e309 (diff) | |
| download | irssi-7dbb8efdde3720fd15f06de088848259e24e3397.zip | |
get rid of PL_na
Diffstat (limited to 'src/perl/perl-core.c')
| -rw-r--r-- | src/perl/perl-core.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c index 08d0738c..226be969 100644 --- a/src/perl/perl-core.c +++ b/src/perl/perl-core.c @@ -237,7 +237,7 @@ static int perl_script_eval(PERL_SCRIPT_REC *script) error = NULL; if (SvTRUE(ERRSV)) { - error = SvPV(ERRSV, PL_na); + error = SvPV_nolen(ERRSV); if (error != NULL) { error = g_strdup(error); |