diff options
| author | Emanuele Giaquinta <exg@irssi.org> | 2006-09-11 09:29:58 +0000 |
|---|---|---|
| committer | exg <exg@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2006-09-11 09:29:58 +0000 |
| commit | 714aa30b4e65eca3f5933dc1c0589cb37df7116f (patch) | |
| tree | 74510f452fd81a348f87909bae48fabb1d45c537 /src | |
| parent | 9fbe09f08614db5a55446ae8fb9d399976e3a266 (diff) | |
| download | irssi-714aa30b4e65eca3f5933dc1c0589cb37df7116f.zip | |
Add support for utf8 to Irssi::settings_get_str.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4339 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src')
| -rw-r--r-- | src/perl/common/Settings.xs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/perl/common/Settings.xs b/src/perl/common/Settings.xs index 11a48bb6..624f1102 100644 --- a/src/perl/common/Settings.xs +++ b/src/perl/common/Settings.xs @@ -68,11 +68,12 @@ void perl_settings_deinit(void) MODULE = Irssi::Settings PACKAGE = Irssi PROTOTYPES: ENABLE -char * +SV * settings_get_str(key) char *key CODE: - RETVAL = (char *) settings_get_str(key); + RETVAL = newSVpv(settings_get_str(key), 0); + SvUTF8_on(RETVAL); OUTPUT: RETVAL |