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

added Irssi::Theme::get_format()

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2726 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2002-04-27 19:35:17 +00:00 committed by cras
parent a68d8dd539
commit ad9329a1a6
1 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/perl/ui/Themes.xs
View File

@ -223,3 +223,31 @@ PPCODE:
}
XPUSHs(sv_2mortal(new_pv(ret)));
g_free_not_null(ret);
char *
theme_get_format(theme, module, formatnum)
Irssi::UI::Theme theme
char *module
int formatnum
PREINIT:
MODULE_THEME_REC *modtheme;
FORMAT_REC *formats;
char *ret;
CODE:
formats = g_hash_table_lookup(default_formats, module);
if (formats == NULL)
croak("Unknown module: %s", module);
modtheme = g_hash_table_lookup(theme->modules, module);
if (modtheme != NULL && formatnum >= modtheme->count) {
croak("Format number out of range (%s: %d < %d)",
module, formatnum, modtheme->count);
}
RETVAL = modtheme == NULL ? NULL : modtheme->formats[formatnum];
if (RETVAL == NULL) {
formats = g_hash_table_lookup(default_formats, module);
RETVAL = formats == NULL ? NULL : formats[formatnum].def;
}
OUTPUT:
RETVAL