Switch to https urls

[factor.git] / extra / metar / metar.factor

diff --git a/extra/metar/metar.factor b/extra/metar/metar.factor
index 295851daf327c53362a454718932404c42d78a37..975dc761c3e8f7ed69ebff0a73a1478099acaac2 100644 (file)
--- a/extra/metar/metar.factor
+++ b/extra/metar/metar.factor
@@ -1,5 +1,5 @@
 ! Copyright (C) 2013 John Benediktsson
-! See http://factorcode.org/license.txt for BSD license
+! See https://factorcode.org/license.txt for BSD license
 
 USING: accessors arrays ascii assocs calendar calendar.format
 classes.tuple combinators command-line continuations csv
@@ -41,7 +41,7 @@ ERROR: bad-location str ;
     ] [ drop f ] if ;
 
 : stations-data ( -- seq )
-    URL" http://tgftp.nws.noaa.gov/data/nsd_cccc.txt"
+    URL" https://tgftp.nws.noaa.gov/data/nsd_cccc.txt"
     http-get nip CHAR: ; [ string>csv ] with-delimiter ;
 
 PRIVATE>
@@ -651,7 +651,7 @@ GENERIC: metar ( station -- metar )
 M: station metar cccc>> metar ;
 
 M: string metar
-    "http://tgftp.nws.noaa.gov/data/observations/metar/stations/%s.TXT"
+    "https://tgftp.nws.noaa.gov/data/observations/metar/stations/%s.TXT"
     sprintf http-get nip ;
 
 GENERIC: metar. ( station -- )
@@ -793,7 +793,7 @@ GENERIC: taf ( station -- taf )
 M: station taf cccc>> taf ;
 
 M: string taf
-    "http://tgftp.nws.noaa.gov/data/forecasts/taf/stations/%s.TXT"
+    "https://tgftp.nws.noaa.gov/data/forecasts/taf/stations/%s.TXT"
     sprintf http-get nip ;
 
 GENERIC: taf. ( station -- )