updates.

[silc.git] / apps / irssi / src / perl / ui / UI.xs

diff --git a/apps/irssi/src/perl/ui/UI.xs b/apps/irssi/src/perl/ui/UI.xs
index 83c2a366bf7c6d52070672918494afdb8d26cbcc..c2ee46b48b82b3043e6c01d686512bb34f5c1db7 100644 (file)
--- a/apps/irssi/src/perl/ui/UI.xs
+++ b/apps/irssi/src/perl/ui/UI.xs
@@ -36,6 +36,7 @@ static void perl_window_fill_hash(HV *hv, WINDOW_REC *window)
        hv_store(hv, "servertag", 9, new_pv(window->servertag), 0);
        hv_store(hv, "level", 5, newSViv(window->level), 0);
 
+       hv_store(hv, "immortal", 8, newSViv(window->immortal), 0);
        hv_store(hv, "sticky_refnum", 13, newSViv(window->sticky_refnum), 0);
 
        hv_store(hv, "data_level", 10, newSViv(window->data_level), 0);