diff --git a/src/perl/ui/UI.xs b/src/perl/ui/UI.xs
index c3b69900..2b55e8cb 100644
--- a/src/perl/ui/UI.xs
+++ b/src/perl/ui/UI.xs
@@ -37,8 +37,8 @@ static void perl_window_fill_hash(HV *hv, WINDOW_REC *window)
 
 	hv_store(hv, "sticky_refnum", 13, newSViv(window->sticky_refnum), 0);
 
-	hv_store(hv, "data_level", 8, newSViv(window->data_level), 0);
-	hv_store(hv, "hilight_color", 10, new_pv(window->hilight_color), 0);
+	hv_store(hv, "data_level", 10, newSViv(window->data_level), 0);
+	hv_store(hv, "hilight_color", 13, new_pv(window->hilight_color), 0);
 
 	hv_store(hv, "last_timestamp", 14, newSViv(window->last_timestamp), 0);
 	hv_store(hv, "last_line", 9, newSViv(window->last_line), 0);