summaryrefslogtreecommitdiff
path: root/src/perl/ui/UI.xs
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-10-25 11:21:18 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-10-25 11:21:18 +0000
commitbe48bdc22c28fd0bd68ef66e836e1943a5fe169d (patch)
treeaea94f571c47b853d5cdbb6240624c5483e961f3 /src/perl/ui/UI.xs
parentc5c2242ee379c01797ae3c3fb770add8d1203683 (diff)
downloadirssi-be48bdc22c28fd0bd68ef66e836e1943a5fe169d.zip
Added Irssi::current_theme() and Irssi::Theme::format_expand()
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1918 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/ui/UI.xs')
-rw-r--r--src/perl/ui/UI.xs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/perl/ui/UI.xs b/src/perl/ui/UI.xs
index 963f6bbb..0f7a39ac 100644
--- a/src/perl/ui/UI.xs
+++ b/src/perl/ui/UI.xs
@@ -41,6 +41,7 @@ static void perl_window_fill_hash(HV *hv, WINDOW_REC *window)
hv_store(hv, "last_timestamp", 14, newSViv(window->last_timestamp), 0);
hv_store(hv, "last_line", 9, newSViv(window->last_line), 0);
+ hv_store(hv, "theme", 5, plain_bless(window->theme, "Irssi::UI::Theme"), 0);
hv_store(hv, "theme_name", 10, new_pv(window->theme_name), 0);
}