aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-07-21 03:14:16 -04:00
Code

add settings*choice functions to perl

Browse Source
This commit is contained in:
Ailin Nemui 2022-02-07 16:44:14 +01:00
parent f47154d1a9
commit 76d140650a
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -104,6 +104,10 @@ int
settings_get_size(key) settings_get_size(key)
char *key char *key
int
settings_get_choice(key)
char *key
void void
settings_set_str(key, value) settings_set_str(key, value)
char *key char *key
@ -134,6 +138,11 @@ settings_set_size(key, value)
char *key char *key
char *value char *value
int
settings_set_choice(key, value)
char *key
char *value
void void
settings_add_str(section, key, def) settings_add_str(section, key, def)
char *section char *section
@ -188,6 +197,16 @@ CODE:
perl_settings_add(key); perl_settings_add(key);
settings_add_size_module(MODULE_NAME"/scripts", section, key, def); settings_add_size_module(MODULE_NAME"/scripts", section, key, def);
void
settings_add_choice(section, key, def, choices)
char *section
char *key
int def
char *choices
CODE:
perl_settings_add(key);
settings_add_choice_module(MODULE_NAME "/scripts", section, key, def, choices);
void void
settings_remove(key) settings_remove(key)
char *key char *key