zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-19 16:42:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

Added Irssi::current_theme() and Irssi::Theme::format_expand()

Browse source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1918 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2001-10-25 11:21:18 +00:00 • committed by cras
commit be48bdc22c
2 changed files with 16 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

15
src/perl/ui/Themes.xs
View file

@ -54,6 +54,13 @@ void perl_themes_deinit(void)
MODULE = Irssi::UI::Themes PACKAGE = Irssi
PROTOTYPES: ENABLE
Irssi::UI::Theme
current_theme()
CODE:
RETVAL = current_theme;
OUTPUT:
RETVAL
void
theme_register(formats)
SV *formats
@ -175,3 +182,11 @@ CODE:
printformat_perl(&dest, format, arglist);
#*******************************
MODULE = Irssi::UI::Themes PACKAGE = Irssi::UI::Theme PREFIX = theme_
#*******************************
char *
theme_format_expand(theme, format)
Irssi::UI::Theme theme
char *format