summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Estabrook <jestabro@vyos.io>2023-05-10 21:06:22 -0500
committerJohn Estabrook <jestabro@vyos.io>2023-05-10 22:52:25 -0500
commitea2105a95dc1d821a933a6a441f5efc39779a624 (patch)
treec2eee56088494501dc8a938a60eb8f61207e5181
parent7b2755aca4be3301c21803a9a6d97c5e9f39bb91 (diff)
downloadvyos1x-config-ea2105a95dc1d821a933a6a441f5efc39779a624.tar.gz
vyos1x-config-ea2105a95dc1d821a933a6a441f5efc39779a624.zip
T5194: drop keep_order field
This is not applicable under the current node sorting; drop for now.
-rw-r--r--src/reference_tree.ml7
-rw-r--r--src/reference_tree.mli3
2 files changed, 0 insertions, 10 deletions
diff --git a/src/reference_tree.ml b/src/reference_tree.ml
index bdc1cdc..e47e9d8 100644
--- a/src/reference_tree.ml
+++ b/src/reference_tree.ml
@@ -31,7 +31,6 @@ type ref_node_data = {
owner: string option;
priority: string option;
default_value: string option;
- keep_order: bool;
hidden: bool;
secret: bool;
} [@@deriving to_yojson]
@@ -54,7 +53,6 @@ let default_data = {
owner = None;
priority = None;
default_value = None;
- keep_order = false;
hidden = false;
secret = false;
}
@@ -155,7 +153,6 @@ let data_from_xml d x =
{d with priority=Some i}
| Xml.Element ("hidden", _, _) -> {d with hidden=true}
| Xml.Element ("secret", _, _) -> {d with secret=true}
- | Xml.Element ("keepChildOrder", _, _) -> {d with keep_order=true}
| _ -> raise (Bad_interface_definition "Malformed property tag")
in Xml.fold aux d x
@@ -234,10 +231,6 @@ let is_valueless reftree path =
let data = Vytree.get_data reftree path in
data.valueless
-let get_keep_order reftree path =
- let data = Vytree.get_data reftree path in
- data.keep_order
-
let get_owner reftree path =
let data = Vytree.get_data reftree path in
data.owner
diff --git a/src/reference_tree.mli b/src/reference_tree.mli
index 538af91..0e70ff5 100644
--- a/src/reference_tree.mli
+++ b/src/reference_tree.mli
@@ -26,7 +26,6 @@ type ref_node_data = {
owner: string option;
priority: string option;
default_value: string option;
- keep_order: bool;
hidden: bool;
secret: bool;
} [@@deriving to_yojson]
@@ -55,8 +54,6 @@ val is_leaf : t -> string list -> bool
val is_valueless : t -> string list -> bool
-val get_keep_order : t -> string list -> bool
-
val get_owner : t -> string list -> string option
val get_help_string : t -> string list -> string