diff options
| author | Alexander Færøy <ahf@0x90.dk> | 2014-06-27 14:31:04 +0200 |
|---|---|---|
| committer | Alexander Færøy <ahf@0x90.dk> | 2014-06-27 14:31:04 +0200 |
| commit | b8c2915d79a1e0ccec92e627b716fe0a6af81fc6 (patch) | |
| tree | 57f01b2716bd7ab4159eb68ac5fb9aec88a48d59 /src/perl/perl-sources.c | |
| parent | e4051eb42e7ab9965c9e523c443dca26326ef73a (diff) | |
| parent | f58a461c54f2189543d64303e8c80bacda78448d (diff) | |
| download | irssi-b8c2915d79a1e0ccec92e627b716fe0a6af81fc6.zip | |
Merge pull request #59 from ailin-nemui/perl-pl-na
get rid of PL_na
Diffstat (limited to 'src/perl/perl-sources.c')
| -rw-r--r-- | src/perl/perl-sources.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/perl-sources.c b/src/perl/perl-sources.c index d36329c9..33fe6dd1 100644 --- a/src/perl/perl-sources.c +++ b/src/perl/perl-sources.c @@ -83,7 +83,7 @@ static int perl_source_event(PERL_SOURCE_REC *rec) SPAGAIN; if (SvTRUE(ERRSV)) { - char *error = g_strdup(SvPV(ERRSV, PL_na)); + char *error = g_strdup(SvPV_nolen(ERRSV)); signal_emit("script error", 2, rec->script, error); g_free(error); } |