diff options
-rw-r--r-- | src/perl/perl-common.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c index cb5d0107..c5c5175a 100644 --- a/src/perl/perl-common.c +++ b/src/perl/perl-common.c @@ -329,7 +329,7 @@ void perl_window_item_fill_hash(HV *hv, WI_ITEM_REC *item) hv_store(hv, "name", 4, new_pv(item->name), 0); hv_store(hv, "createtime", 10, newSViv(item->createtime), 0); - hv_store(hv, "data_level", 8, newSViv(item->data_level), 0); + hv_store(hv, "data_level", 10, newSViv(item->data_level), 0); hv_store(hv, "hilight_color", 10, new_pv(item->hilight_color), 0); } |