summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Estabrook <jestabro@vyos.io>2025-11-23 20:42:57 -0600
committerJohn Estabrook <jestabro@vyos.io>2025-12-02 13:10:41 -0600
commit9def9bcde17e0720283dae6822bece98983bf7ee (patch)
tree971a0ab51a12ef1925a1c691c7bf700f9c925cb7
parent44397fa19950a6d729080051835c079cbf811435 (diff)
downloadvyconf-9def9bcde17e0720283dae6822bece98983bf7ee.tar.gz
vyconf-9def9bcde17e0720283dae6822bece98983bf7ee.zip
T8032: add translation of sessionUnsaved
-rw-r--r--src/vyconf_cli_compat.ml3
1 files changed, 3 insertions, 0 deletions
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