summaryrefslogtreecommitdiff
path: root/src/util.ml
diff options
context:
space:
mode:
authorJohn Estabrook <jestabro@vyos.io>2023-05-16 12:47:05 -0500
committerGitHub <noreply@github.com>2023-05-16 12:47:05 -0500
commitcd4d75828efc51f42a53966ad7d85e4f0500b089 (patch)
treec2eee56088494501dc8a938a60eb8f61207e5181 /src/util.ml
parentceed15b2b064b36c0f49d2142ebe0dafeaa34267 (diff)
parentea2105a95dc1d821a933a6a441f5efc39779a624 (diff)
downloadvyos1x-config-cd4d75828efc51f42a53966ad7d85e4f0500b089.tar.gz
vyos1x-config-cd4d75828efc51f42a53966ad7d85e4f0500b089.zip
Merge pull request #17 from jestabro/reference-tree
T5194: add support for reference tree
Diffstat (limited to 'src/util.ml')
-rw-r--r--src/util.ml4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/util.ml b/src/util.ml
index bb30645..9c5df23 100644
--- a/src/util.ml
+++ b/src/util.ml
@@ -34,3 +34,7 @@ let default default_value opt =
let lexical_numeric_compare s t =
lex_numeric_compare s t
+
+(** Convert a relative path to an absolute path based on the current working directory *)
+let absolute_path relative_path =
+ FilePath.make_absolute (Sys.getcwd ()) relative_path