diff options
| author | Timo Sirainen <cras@irssi.org> | 2002-02-10 14:59:36 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-02-10 14:59:36 +0000 |
| commit | 9bb16705a5e6bf100797985cc596b9bcb9f0d6da (patch) | |
| tree | 1637336d5064a6248169c1e2631f3228d967e04e /src/perl/ui | |
| parent | 59c5bb100a58948c149ed1be18e72c6c16ad4db3 (diff) | |
| download | irssi-9bb16705a5e6bf100797985cc596b9bcb9f0d6da.zip | |
Support for "immortal" windows, that can't be closed until explicitly set to
mortal with /WINDOW IMMORTAL OFF. Status and msgs windows are immortal by
default.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2422 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/ui')
| -rw-r--r-- | src/perl/ui/UI.xs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/perl/ui/UI.xs b/src/perl/ui/UI.xs index 83c2a366..c2ee46b4 100644 --- a/src/perl/ui/UI.xs +++ b/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); |