summaryrefslogtreecommitdiff
path: root/src/perl/perl-common.c
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2002-04-23 17:31:50 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2002-04-23 17:31:50 +0000
commit30802787dc0d80ba18fc6e6bd01e31676fed2589 (patch)
treeef3f4030a27bd555ff13978497da9de77b1edabf /src/perl/perl-common.c
parentcdec9aa9c62601e459204b285025976d8bfc2ed4 (diff)
downloadirssi-30802787dc0d80ba18fc6e6bd01e31676fed2589.zip
added $query->{last_unread_msg}
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2710 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-common.c')
-rw-r--r--src/perl/perl-common.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c
index cb5f0987..cb5d0107 100644
--- a/src/perl/perl-common.c
+++ b/src/perl/perl-common.c
@@ -369,6 +369,7 @@ void perl_query_fill_hash(HV *hv, QUERY_REC *query)
perl_window_item_fill_hash(hv, (WI_ITEM_REC *) query);
+ hv_store(hv, "last_unread_msg", 15, newSViv(query->last_unread_msg), 0);
hv_store(hv, "address", 7, new_pv(query->address), 0);
hv_store(hv, "server_tag", 10, new_pv(query->server_tag), 0);
hv_store(hv, "unwanted", 8, newSViv(query->unwanted), 0);