summaryrefslogtreecommitdiff
path: root/src/reference_tree.ml
diff options
context:
space:
mode:
authorJohn Estabrook <jestabro@vyos.io>2025-04-11 00:23:12 -0500
committerJohn Estabrook <jestabro@vyos.io>2025-04-11 13:36:10 -0500
commitb8837136f39873663984733080ce006174f957ec (patch)
treebf254c9ed2f2873a0c8585a9af2b88ec0c69ab0b /src/reference_tree.ml
parent29785a8aa9ebbb1f821a858b3d8f0379dbd30798 (diff)
downloadvyos1x-config-b8837136f39873663984733080ce006174f957ec.tar.gz
vyos1x-config-b8837136f39873663984733080ce006174f957ec.zip
T7321: fix bug in split_path which missed tag values
Diffstat (limited to 'src/reference_tree.ml')
-rw-r--r--src/reference_tree.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/reference_tree.ml b/src/reference_tree.ml
index a2c0f22..d39cc96 100644
--- a/src/reference_tree.ml
+++ b/src/reference_tree.ml
@@ -433,7 +433,7 @@ let split_path node path =
match child with
| Some c -> aux c ps (p' :: p :: acc)
| None -> (List.rev acc, None))
- | [_] -> (List.rev acc, None)
+ | [p] -> (List.rev (p :: acc), None)
| _ -> (List.rev acc, None)
end
| Other ->