Set correctly HOME and SRC with the current directory

2026-05-26 16:30:07 +08:00 · 2007-09-04 21:11:46 +00:00
parent 203c6c4e44
commit 08860c735f
1 changed files with 1 additions and 0 deletions
@@ -5,6 +5,7 @@ let dirname = Filename.dirname Sys.argv.(0)
 let env =
  Array.map (fun var ->
   let value = try Sys.getenv var with _ -> dirname in
+   let value = if value = "." then Sys.getcwd () else value in
   Printf.sprintf "%s=%s" var value)
   [|"PAPARAZZI_SRC"; "PAPARAZZI_HOME"|]
 let com = dirname // "sw/supervision/paparazzicenter";;