diff --git a/sw/lib/ocaml/srtm.ml b/sw/lib/ocaml/srtm.ml
index 232d4630bb..c9b95f5cf2 100644
--- a/sw/lib/ocaml/srtm.ml
+++ b/sw/lib/ocaml/srtm.ml
@@ -29,10 +29,10 @@ open Latlong
 type error = string
 exception Tile_not_found of string
 
-let srtm_url = "ftp://e0srp01u.ecs.nasa.gov/srtm/version2/SRTM3"
+let srtm_url = "http://dds.cr.usgs.gov/srtm/version2_1/SRTM3"
 
 let error = fun string ->
-  Printf.sprintf "put %s/???/%s.hgt.zip in data/srtm/" srtm_url string
+  Printf.sprintf "download %s/???/%s.hgt.zip in data/srtm/" srtm_url string
 
 let tile_size = 1201