aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-12-04 14:46:39 -05:00
Code

Add support for utf8 to Irssi::settings_get_str.

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4339 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Emanuele Giaquinta 2006-09-11 09:29:58 +00:00 committed by exg
parent 9fbe09f086
commit 714aa30b4e
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/perl/common/Settings.xs
View File

@ -68,11 +68,12 @@ void perl_settings_deinit(void)
MODULE = Irssi::Settings PACKAGE = Irssi MODULE = Irssi::Settings PACKAGE = Irssi
PROTOTYPES: ENABLE PROTOTYPES: ENABLE
char * SV *
settings_get_str(key) settings_get_str(key)
char *key char *key
CODE: CODE:
RETVAL = (char *) settings_get_str(key); RETVAL = newSVpv(settings_get_str(key), 0);
SvUTF8_on(RETVAL);
OUTPUT: OUTPUT:
RETVAL RETVAL