From e24ce29d29ed5f6830f02bad37e5ebe9bf88b500 Mon Sep 17 00:00:00 2001
From: b <rowerynaksiezycu@gmail.com>
Date: Thu, 4 Jan 2024 19:58:19 +0000
Subject: [PATCH] update statis index with frame 0

---
 update.1.pl | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/update.1.pl b/update.1.pl
index af04ce3..09ee4e4 100644
--- a/update.1.pl
+++ b/update.1.pl
@@ -30,7 +30,8 @@ use botm_common (
 );
 use bsta_lib (
 	'STATE',
-	'ong'
+	'ong',
+	'write_index'
 );
 
 ###PERL_DATA_DEFAULT_PATH:  DATA_DEFAULT_PATH  = /botm/data/bsta/default
@@ -104,6 +105,13 @@ foreach my $id (@list) {
 		$fail += 1;
 		print "ONG FAIL!\n";
 	}
+	if (($id == 0) && ($ong_state > STATE->{'inactive'})) {
+		write_index(
+			\%state,
+			\%settings,
+		);
+	}
+		
 }
 print "\n";
 
-- 
2.30.2