From 9def9bcde17e0720283dae6822bece98983bf7ee Mon Sep 17 00:00:00 2001
From: John Estabrook <jestabro@vyos.io>
Date: Sun, 23 Nov 2025 20:42:57 -0600
Subject: T8032: add translation of sessionUnsaved

---
 src/vyconf_cli_compat.ml | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src')

diff --git a/src/vyconf_cli_compat.ml b/src/vyconf_cli_compat.ml
index eaa3501..6ebd1f1 100644
--- a/src/vyconf_cli_compat.ml
+++ b/src/vyconf_cli_compat.ml
@@ -9,6 +9,7 @@ type op_t =
     | OpEditLevelRoot
     | OpShowConfig
     | OpSessionChanged
+    | OpConfigUnsaved
 
 let op_of_arg s =
     match s with
@@ -19,6 +20,7 @@ let op_of_arg s =
     | "editLevelAtRoot" -> OpEditLevelRoot
     | "showCfg" -> OpShowConfig
     | "sessionChanged" -> OpSessionChanged
+    | "sessionUnsaved" -> OpConfigUnsaved
     | _ -> failwith (Printf.sprintf "Unknown operation %s" s)
 
 let in_cli_config_session () =
@@ -88,6 +90,7 @@ let main op path =
         | OpEditLevelRoot -> edit_level_root c
         | OpShowConfig -> show_config c path
         | OpSessionChanged -> session_changed c
+        | OpConfigUnsaved -> config_unsaved c None
         end
     | Error e -> Error e |> Lwt.return
     in
-- 
cgit v1.2.3