diff options
author | Emanuele Giaquinta <exg@irssi.org> | 2006-12-10 15:53:19 +0000 |
---|---|---|
committer | exg <exg@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2006-12-10 15:53:19 +0000 |
commit | 3cfc7f92f6a416c9b7105be61931d5ddfe46a373 (patch) | |
tree | 3f541ad40d61ce745d9f9bb997f5098909488c32 /src/perl/common | |
parent | 737890d131804fe8e2796b35ae8e426b01c59c8a (diff) | |
download | irssi-3cfc7f92f6a416c9b7105be61931d5ddfe46a373.zip |
Declare str in PREINIT section.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4400 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/common')
-rw-r--r-- | src/perl/common/Settings.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/perl/common/Settings.xs b/src/perl/common/Settings.xs index 684b7718..a9bdd11d 100644 --- a/src/perl/common/Settings.xs +++ b/src/perl/common/Settings.xs @@ -72,9 +72,9 @@ PROTOTYPES: ENABLE SV * settings_get_str(key) char *key -CODE: +PREINIT: const char *str; - +CODE: str = settings_get_str(key); RETVAL = new_pv(str); if (is_utf8()) |