Mirrors_Framework/paparazzi
1
0
Fork 0
mirror of https://github.com/paparazzi/paparazzi.git synced 2026-05-31 20:38:27 +08:00
Code Issues Actions 28 Packages Projects Releases Wiki Activity

[lib] fix default maps file in maps support

Browse Source
This commit is contained in:
Felix Ruess
2013-09-16 14:03:57 +02:00
parent 7dda3e0a1a
commit c0e0a45260
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/lib/ocaml/maps_support.ml
+2 -1
View File
@@ -24,9 +24,10 @@
let home = Env.paparazzi_home let home = Env.paparazzi_home
let (//) = Filename.concat let (//) = Filename.concat
let maps_xml_path = home // "conf" // "maps.xml" let maps_xml_path = home // "conf" // "maps.xml"
let maps_xml_default_path = home // "conf" // "maps_example.xml"
let maps_xml = ExtXml.parse_file maps_xml_path let maps_xml = ExtXml.parse_file maps_xml_path
let maps_xml_default = ExtXml.parse_file (maps_xml_path^".example") let maps_xml_default = ExtXml.parse_file (maps_xml_default_path)
let gv = try Some (ExtXml.int_attrib maps_xml "google_version") with _ -> None let gv = try Some (ExtXml.int_attrib maps_xml "google_version") with _ -> None
let gv_default = try ExtXml.int_attrib maps_xml_default "google_version" with _ -> 0 let gv_default = try ExtXml.int_attrib maps_xml_default "google_version" with _ -> 0